составить таблицу квадратов,первых двадцати положительных чисел 1<либо равно а<либо равно20,шаг=1,с=а*а,sqr(a),a=a+1
Ответы
Ответ дал:
0
For a := 1 to 20 do
begin
writeln(a,"^2 = ", a*a);
end
или
a:= 1;
repeat
writeln(a,"^2 = ", a*a);
a := a + 1;
until a > 20;
Похожие вопросы
2 года назад
2 года назад
10 лет назад
10 лет назад
10 лет назад