Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 895 б
- Dwayne_Johnson 865 б
3 апреля 2023 06:26
770
Одноклеточная амеба каждые 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
·
Хороший ответ
5 апреля 2023 06:26
Остались вопросы?
Еще вопросы по категории Информатика
Дан алгоритм для Робота: алг нач нц 53 раз вправо; закрасить кц кон Робот выполнит 53 шагов вправо и закрасит эти клетки, если не будет встр...
Сколько существует различных последовательностей из символов плюс и минус длиной 6 символов...
Сколько значащих нулей в двоичной записи числа 4^16+2^36-16? По подробнее с формулами....
Паскаль: 36 - Оператор вывода 1. Что будет выведено на экран в результате выполнения фрагмента программы a:=5; b:=3; write( a, '=Z(', b, ')' ); Зд...
ниже в табличной форме представлен фрагмент базы данных о результатах тестирования учащихся (используется 100 бальная шкала) (смотри вложение) сколько...