Дано множество натуральных чисел от 1 до 20,вывести множество квадратов элементов Нужно...

Question

Дано множество натуральных чисел от 1 до 20,вывести множество квадратов элементов
Нужно составить программу по языку Паскаль. Помогите даю 53 балла

Answer 1

Program one;
var
i:integer;
begin
for i:=1 to 20 do
writeln(sqr(i));
end.