Question

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

Answer 1

const
    n = 10;

var
    i: integer;

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