Написать программу, которая выводит на экран квадраты первых 10 целых положительных чисел.
Написать программу, которая выводит на экран квадраты первых 10 целых положительных чисел.
Гость
Ответ(ы) на вопрос:
Гостьprogram aspfoj;
var i, a:integer;
begin
a:=1;
for i:=1 to 10 do begin
writeln (a*a);
a:=i+1; end;
end.
Не нашли ответ?
Похожие вопросы