Регистрация
IVANICH31
09.08.2020 19:10
Информатика
Есть ответ 👍

Информатика! написать программу на паскале для вывода на экран квадратов всех натуральных чисел, не превосходящих 50

158
315
Посмотреть ответы 2

Ответы на вопрос:

alibaevaalina146
alibaevaalina146
4,5(44 оценок)
Var i: integer; begin for i: =1 to 50 do begin writeln(i*i); end; end.
Alena26vl
Alena26vl
4,4(10 оценок)
Var  a: array [1..10] of integer;   i, k: integer; begin for i: =1 to 10 do begin a[i]: =random(9); write(a[i],' '); if a[i] = 5 then k: =k+1; end; writeln; writeln(k); end.

Популярно: Информатика