Предмет: Информатика,
автор: Annnnna
составить таблицу квадратов,первых двадцати положительных чисел 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;
Интересные вопросы
Предмет: Литература,
автор: gadayev93
Предмет: Английский язык,
автор: Аноним
Предмет: География,
автор: gamozenkodasa
Предмет: Химия,
автор: аnn5
Предмет: Математика,
автор: МаШшаА