В-1. Выполнить следующие действия:
Создать одномерный массив А из 11 целых чисел (числа вводит пользователь с
клавиатуры);
Вывести на экран массив в виде строки чисел.
B-2. Выполнить следующие действия:
Создать одномерный массив А из 15 целых чисел (случайными числами в интервале от 0
до 55);
Вывести на экран массив в виде строки чисел
В-1:
program z1;
var A: array[1..11] of integer;
i: integer;
begin
for i:=1 to 11 do readln(A[i]);
for i:=1 to 11 do write (A[i], ' ');
end.
В-2:
program z2;
var A: array[1..15] of integer;
i: integer;
begin
randomize;
for i:= 1 to 15 do
A[i]:= random(56);
for i:= 1 to 15 do write(A[i], ' ');
end.
Объяснение: