Ответы
Ответ дал:
1
1 for i:=1 to 100 do
2 begin
3 write(a[i],' ' );
4 if i mod 10=0 then writeln;
5 end;
Вас заинтересует
1 год назад
2 года назад
8 лет назад
9 лет назад