Составьте программу, выводящую ** экран квадраты чисел от 10 до 20

Question

Составьте программу, выводящую на экран квадраты чисел от 10 до 20

Answer 1

Var k:integer;
begin
for k:=10 to 20 do
writeln(k*k);
end.