В-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.
Объяснение:
