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

Напечатать на экране числа 2187,729,243,...,3.
Категория: Информатика 3 года назад
На вопрос 3 года назад
Амелия Воробьёва
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
Ответ получен 3 года назад
Лейла Герасименко

Пожалуйста зарегистрируйтесь/войдите для ответа на вопрос.  Нажмите для входа

Войти на сайт