Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1705 б
- arkasha_bortnikov 895 б
- Dwayne_Johnson 860 б
2 апреля 2023 12:06
442
Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3, 6, 9,..., 24 часа, если первоначально была одна амеба.
1
ответ
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
0
·
Хороший ответ
4 апреля 2023 12:06
Остались вопросы?
Еще вопросы по категории Информатика
Заполните таблицу, в каждой строке которой одно и то же число должно быть записано в системах счисления с основаниями 2,8, 10 ,16. Основание2 Основани...
На ферме 600 коров. На поле 10000 слепней. От численно превосходящего врага коровы спасаются бегством в лес. Ищут их по радиомаякам, передающим код ко...
Как нарисовать цилиндр в паскале при том Что ввод высоты и радиуса окружности вводится с клавиатуры(обязательно!)...
Алгоритмический язык алг нач цел s, k s := 2 нц для k от 1 до 5 s := s * 2 кц вывод s...
Что такое знак? Приведите примеры знаков, используемых в общении людей....
Все предметы