Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3, 6, 9,..., 24 часа, если первоначально была одна амеба.

1 ответ

Посмотреть ответы

DevAdmin

1720

Var
amoebas, t: integer;

begin
amoebas := 1;
t := 0;

repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.

Хороший ответ

5 апреля 2023 06:26

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Определите, устройством информации ввода или вывода информации является каждое из устройств , названия которых приведены ниже (соедините стрелками)... вождь племени мульти поручил своему министру разработать двоичный код и перевести в него всю важную информацию.достаточно ли пятиразрядного двоичного... Исполнитель преобразует число, записанное на экране. У исполнителя есть три команды, которым присвоены номера: A . Прибавить 1 B .&n... Написать в тетради программу, которая создаёт файл numbers.txt и записывает в него 5 введенных пользователем целых чисел.... Вычислите десятичные эквиваленты следующих чисел. Число Десятичный эквивалент числа 2016,8 степени 2014, 5 степени...