Составить программу вывода ** экран квадратов N чисел. N=10ю

Question

Составить программу вывода на экран квадратов N чисел. N=10ю

Answer 1

Const
    n = 10;

var
    i: integer;

begin
    for i := 1 to n do
        writeln(i * i);
end.