Массив – совокупность конечного числа данных одного типа.

(1,3,6,2,67,78,5) А= а 1 а 1 а 2 а 2 а 3 а 3 а 4 а 4 а 5 а 5 а 6 а 6 ( )

Индекс – определяет положение элемента массива относительно его начала.

Var имя массива :array[n 1..n 2 ] of Var А :array[ ] of integer (1,3,6,2,67,78,5) А=

Random(x)

Сформировать массив из n элементов, где элементы массива – целые случайные числа в пределах от 1 до 45. Напечатать элементы массива в прямом и обратном порядке.

Program chisla; Var i, n: integer; a: array[ ] of integer; Begin write('n='); readln(n); for i:=1 to n do begin a[i]:=random(45)+1; write(a[i]:4); end; writeln; for i:=n downto 1 do begin write(a[i]:4); end; end. Описание переменных Ввод размерности Формирование массива и вывод в прямом порядке Вывод массива в обратном порядке