Массив – это упорядоченный набор компонентов одинакового типа.

Массив – это упорядоченный набор компонентов одинакового типа. Тип компонент, из которых состоит массив, называется базовым типом. Обращение к компонентам массива осуществляется указанием его имени, за которым в квадратных скобках следуют специальные указатели – индексы.

Индексы массива имеют свой тип (обычно целый). Компоненты массива могут быть различного типа. Виды массивов: одномерные, двумерные. Описание a: array[1. . 10] of integer; fff: array[1. . 20] of real;

BEGIN For i: =1 to 15 do Begin Writeln(‘a[‘, i , ‘] = ‘); readln (a[i]); End; For i: =1 to 15 do Writeln(a[i]); End.

BEGIN Randomize; For i: =1 to 15 do Begin a[i]: = random (10)+(20)*(-1); Write (a[i]: 4); End.

Program f 1; Var a: array [1. . 15] of integer; i, s: integer; BEGIN Randomize; s: =0; For i: =1 to 15 do Begin a[i]: = random (20); Write (a[i] : 4); s: =s + a[i]; writeln; End; Writeln (‘сумма элементов массива равна’, s); End.

Program f 2; Var a : array [1. . 15] of integer; i, p: integer; BEGIN Randomize; p: =1; For i: =1 to 15 do Begin a[i]: = random (20); Write (a[i] : 4); p: =p * a[i]; writeln; End; Writeln (‘произведение элементов массива равно’, р); End.

1) Найти сумму элементов массива из 20 целых элементов, заданного случайным образом, в диапазоне от 1 до 10. 2) Найти сумму положительных элементов массива, состоящего из 10 целых элементов (положительных и отрицательных), заданного случайным образом, в диапазоне от -10 до 10.