Ответы и объяснения

2011-05-11T16:11:55+04:00

program kvadrat;

var i : integer;

begin

for i:= 10 to 100 do

writeln ( i:2, i*i : 5);

readln;

end.