Priveee
16.01.2022 02:01

Напечатать на экране числа 2187,729,.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
regionagustin
07.09.2020 20:18
Var a:integer;
begin
a:=2187;
while a>1 do
 begin
 write(a,'  ');
 a:=a div 3;
 end;
end.

Результат:
2187  729  243  81  27  9  3
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота