Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
agellertova
14.09.2020 00:22 •
Информатика
Напечатать на экране числа 2187,729,.
Показать ответ
Ответ:
2006Tatiana2006
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 оценок)
Популярные вопросы: Информатика
VIP161
29.10.2020 12:16
1.Програмирование - это ...* 2.Алгоритм -это ...*3.Переменная - это ...*4.Какую форму имеет блок Условие ? *ПрямоугольникРомбПараллелепипед 5.Сколько конструкций условного оператора...
analekss
02.01.2021 22:16
Кто играет в фф или пабг киньте айди поиграем...
кот7891
13.07.2022 07:05
ЗАДАНИЕ - Текст сформулируйте произвольно В тексте укажите Что Ваш центр не может выполнить своевременно заказ проекта маркетингового исследования фирмы Астра-П в связи с отсутствием...
nosanchuk14
26.05.2023 18:15
Реферат набранный на компьютере, содержит 20 страниц на каждой странице 60 строк, в каждой строке 64 символа. для кодирования символов. Используется Unicode, при котором каждый символ...
DanIEL982
05.04.2022 21:17
Дана функция y = f(x), где f(x) =х+4,3. При каких значениях аргумента выполняется равенство f(x) = 5?ответ: х =...
PaleMan2014
21.03.2023 09:06
Формула =$A$2+$B3 была скопирована из ячейки B6 в ячейку C8. Какая формула получилась в C8?...
agapova2007
07.10.2021 19:05
Упаковать алгоритмом RLE графического формата РСХ следующие данные:68706470189043 4836048016401AD6C4ADC6146A4DC63A4C6486...
дан243
22.03.2021 17:26
Зайти в середовищеTurboPascal 7.0 і ввести програму: Programpruklad; Begin Writeln(‘Это моя перваяпрограмма’); {текст вводити латинськими буквами} readln; End....
Abrak24
05.06.2021 15:30
Являются ли эти устройства временного хранения информации или данных? 1) Жёсткий диск2) USB флэш-память...
KristheMalen
07.10.2020 18:23
Https://1drv.ms/p/s!AtuMHKY8XgZ9inRAcb_ky67EOwmO?e=mVLMNH вступите в повер поинт...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
a:=2187;
while a>1 do
begin
write(a,' ');
a:=a div 3;
end;
end.
Результат:
2187 729 243 81 27 9 3