Регистрация
Mishan03
08.01.2023 01:18
Информатика
Есть ответ 👍

Программа word рисунок осень

183
359
Посмотреть ответы 1

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

Мариелла17
Мариелла17
4,5(13 оценок)
Var i, k: byte; begin i : = 1; k : = 1; while  i < 9  do begin   write (i * i,'   ');   i : = i + 1 end; writeln; repeat   write (k * k * k, '   ');   k : = k + 1; until k = 9 end.

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