Question

Вывод на экран квадратов чисел от 1 до 32.

var
: integer;
begin
for i:=1 to
do
writeln(sqr(
));
readln;
end.