9 класс © Побожьев С.К., МОУ «Лицей» с. Ельники. Массив - это большое пространство чего-то однородного по типу. ( Из словаря иностранных слов, 1954 г.)г.) - презентация

1 9 класс © Побожьев С.К., МОУ «Лицей» с. Ельники

2 Массив - это большое пространство чего-то однородного по типу. ( Из словаря иностранных слов, 1954 г.)г.) Массив в программировании - это структура данных, представляющая собой упорядоченную совокупность значений одного типа. ( Из Оксфордского словаря английского языка, 1995 г.)

3 ОГЛАВЛЕНИЕ 1. Теория 3. Тесты 2. Примеры

4 Массив - это переменная,образованная последовательностью переменных, причём: все они имеют один и тот же тип; каждый компонент имеет свой номер; множество индексов конечно, зафиксировано в определении массива; возможность обработки компонента, его доступность не зависит от его места в последовательности.

5 Описание массива в Paskal: Первый способ: Const MaxM =...; {Максимальные значения количества элементов} Type = Array[1..МахМ] Of ; Var А1, В2, С3: ; Например: Const MaxM = 10; Type А = Array [1..МахМ] Of integer; Var M: A; Второй способ: Const MaxM =...; {Максимальные значения количества элементов} Var :Array[1..MaxN] Of ; Например: Const MaxM = 10; Var А: Array[1..МахМ] Of integer;

6 ВВОД МАССИВА: Program vvod; Const maxM=10; Var tab1: array[1..maxM] of integer; i: integer; Begin For i:=1 to maxM do begin writeln('Введите элементы массива '); readln(tab[i]); end; End.

7 ВЫВОД МАССИВА: Program vivod; Const maxM=10; Var tab1: array[1..maxM] of integer; i: integer; Begin For i:=1 to maxM do begin writeln('Вывод элементов массива '); writeln (tab[i]); end; End.

8 Program Poisk; Const maxM=10; Var К: array[1..maxM] of integer; i,S: integer; Begin For i:=1 to maxM do begin writeln('Введите элементы массива '); readln(К[i]); end; S:=0; for i:=1 to maxM do if К[i]<0 then S:=S+ К[i]; writeln('S=',S) End. Поиск элемента с заданными свойствами. Задан одномерный массив К[1..10], определить сумму отрицательных элементов.

9 Program vvod2; Const maxM=10; Var tab1: array[1..maxM] of integer; i: integer; Begin Randomize; {функция позволяет перемешивать числа из диапазона указанном в функции random и употребляется перед ней } For i:=1 to maxM do begin Tab1[i]:=random(101); {Функция random(101) генерирует целые числа в диапазоне от 0 до 100} write(tab1[i]); end; End. Генерация элементов массива с помощью функции случайных чисел.

10 Дан одномерный массив K из 10 целых элементов, найти максимальный элемент и его индекс. Решение: Program Poisk_2; Const maxM=10; Var К: array[1..maxM] of integer; Max, i, j: integer; Begin Randomize; For i:=1 to maxM do begin К[i]:=random(101); write(К[i]); end; Max:=K[1]; J:=1; for i:=2 to maxM do if Max