Question

описать массив в , который состоит из 11 элементов целого типа

Answer 1

Program asd;
USES crt;
var A:array [1..11] of integer;
i,j:integer;
BEGIN
clrscr;
 For i:=1 to 11 do
  begin 
  Write('  ',i); 
  end;
END.