>> 9 .
2.2.
, . .
, :
for i:=1 to 10 do read (a[i])';
. :
for i:=1 to 10 do a[i] :=i;
, 10 , , 0 99:
randomize; for i:=1 to 10 do a[i]:=random(100);