Слайд 2Описание
Массив – это фиксированное кол-во элементов одного и того же типа,
объединенных одним именем, каждый элемент имеет свой номер.
type MyArray =Array [n1..n2] тип_элементов;
var a: MyArray;
var a: Array [n1..n2] of тип_элементов;
Слайд 3Ввод массива
Способ
const n=50;
var A : array [1..n] of integer;
i : integer;
...
writeln(′Введите′, n ,′элементов массива′);
for i := 1 to n do Read( a[i] );
Слайд 4Способ
randomize;
for i:= 1 to n do begin
a[i] := -25 + random(50);
write( a[i] :4)
end;
Слайд 5Вывод массива
writeln (′Массив :′);
for i :=1 to n do write (′a[′,i, ′]=′,
a[i]);
writeln;
Слайд 6Сумма элементов массива:
s := 0;
for i := 1 to n do s
:= s + a[i];
Слайд 7Поиск минимального элемента и его номера.
K := 1;
for i := 2
to n do
if a[i] < a[k] then k := i;
результат:
k - номер минимального элемента,
a[k] - значение минимального.
Слайд 8Представление в памяти
АДРЕС ( A [ I] )= АДРЕС ( А[1] )+
(i-1) * X байт,
где Х байт – размер одного элемента