Описание массива

Массив описывается в разделе VAR.

имя:ARRAY[n..m] OF тип;

имя - имя массива;

ARRAY - англ.слово "массив";

тип - тип значений элементов;

n..m - диапазон нумерации ячеек,обычно n=1

Примеры. 1) var a:array[1..10] of real;

2) var b,c:array[1..15] of integer;

ВЫВОД МАССИВА

Осуществляется аналогично вводу.

Примеры:

for i:=1 to 10 do write(a[i]:7:2); {вывод в одну строку}

for i:=1 to 10 do writeln(a[i]); {вывод в столбик}

ВЫЧИСЛЕНИЕ СУММЫ ЭЛЕМЕНТОВ МАССИВА

Задача. Сколько денег во всех ячейках?

Решение. Нужно определить сумму элементов всех ячеек.

Сумма обозначается:

Фрагмент программы:

s:=0;

for i:=1 to 10 do s:=s+a[ i ];

Задача. Вычислить сумму элементов массива А(10) с четными индексами. Найти несколько вариантов решения.

Вариант1. s:=0;i:=2;

repeat

s:=s+a[ i ];

i:=i+2;

until i>10;

Вариант2. s:=0;

for i:=1 to 5 do s:=s+a[ 2*i ];

Вариант3. s:=0;

for i:=1 to 10 do

if i mod 2=0 then s:=s+a[ i ];