Написать программу и сделать блок схему Вход:а Выход: квадраты всех чисел от 1 до а

Question

Написать программу и сделать блок схему Вход:а Выход: квадраты всех чисел от 1 до а

Answer 1

var a,i:integer;

begin

readln(a);

for i:=1 to a do writeln(i*i);  

end.