Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
gek45
01.02.2020 11:57 •
Информатика
Одноклеточная амеба каждые 3 часа делится на 2 клетки. определить, сколько амеб будет через 3, 6, 9, 24 часа.выполнить в 3-х циклах.
Показать ответ
Ответ:
ruslankryoi
07.09.2020 18:17
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
VasG12
21.01.2021 14:11
Сколько символов текста можно передать за 5 секунд , используя телефонный канал , работающий со скоростью 56кбит/с?...
диана2376
21.01.2021 14:11
Из квадратного листа картона вырезается коробка в форме куба с известной стороной. определить процент неиспользованного материала, если размеры листа заданы....
dashakoshelevap06xlg
06.11.2022 05:52
решить задачу на паскале!...
svetik3333
29.01.2021 10:36
Заполнить пропуски значениями, в соответствии с предложенными единицами измерения: 257 Мбайт = ? Кбайт = ? бит;...
Killer3D
20.12.2020 18:45
Написать программу поиска произведения последовательности отрицательных чисел, вводимых с клавиатуры, предшествующих первому введенному нулю. Контрольный пример: 1,2,3,-4,5,-2,0....
elenakovaleskau
21.08.2020 14:49
Выберите верные утверждения: а) подмножества объектов выделяет и означает сам объект; б) попарно связаны одним и тем же отношением могут быть только два объекта; в)...
madeintower
26.10.2021 06:11
Как ты понимаешь выражение « ум не промах»?...
anickava
26.10.2021 06:11
Кпредложению sergei and mark have got curly hair. нужно написать отрицание и задать пять типов вопросов....
esaloverzhan
26.10.2021 06:11
Составьте тестовое на установление соответствия, где в левом столбце указаны правовые и неправовые отношения, а в правом — несколько примеров правовых и неправовых...
Znanija96
26.10.2021 06:11
Рассказ своими словами о любом былинном герое...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.