Лучшие помощники
- Megamozg 2170 б
- Matalya1 1800 б
- DevAdmin 1685 б
- arkasha_bortnikov 740 б
- kirill_shatsov 710 б
3 апреля 2023 06:26
626
Одноклеточная амеба каждые 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
Остались вопросы?
Еще вопросы по категории Информатика
Укажите минимальную по номиналу цифру шестнадцатеричной системы счисления...
Задача 1. Ввести 5 элементов списка. И вывести те из них, которые меньше введенного числа. Задача 2. Найти наименьшее положительное число в списке. My...
Вопрос № 1 Сервис, обеспечивающий пересылку файлов между компьютерами сети независимо от их типов, особенностей операционных систем, файловых систем и...
Выясните, что представляет собой обратная польская* запись, и вычислите значение записанного с её помощью выражения: 3 4 + 2 × 1 6 × −. *Обратная по...
Дан одномерный массив а из семи элементов 25 24 10 60 4 100 -11...
Все предметы