ПОМОГИТЕ!!! ИНФОРМАТИКА! написать программу ** паскале для вывода ** экран квадратов всех...

Question

ПОМОГИТЕ!!! ИНФОРМАТИКА! написать программу на паскале для вывода на экран квадратов всех натуральных чисел, не превосходящих 50

Answer 1

Var
i: integer;
Begin
for i:=1 to 50 do begin
Writeln(i*i);
end;
end.