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

Program asd;
USES crt;
Const n=11;
var A:array [1..n] of integer;
i,j:integer;
BEGIN
clrscr;
For i:=1 to n do begin Write(' ',i); 
 end;
END.
Если по условию что-то не так, подправляй