** отрезке от a до b вывести все квадратные числа например 9,12 вывод 81,100,121,144 В...

Question

На отрезке от a до b вывести все квадратные числа например 9,12 вывод 81,100,121,144 В pascalabc

Answer 1

Var
a,b, i: integer;
begin
readln(a);
readln(b);
for i:=a to b do
begin
writeln(i*i);
end;
end.