Одноклеточная амеба каждые 3 часа делится на 2 клетки. Сколько амеб будет через 15 часов? Программа паскаль.

Предыдущий
вопрос Следующий
вопрос

program AmoebaDivision;

var
hours, cells, i: integer;

begin
cells := 1;

for i := 1 to 5 do
begin
cells := cells * 2;
end;

writeln('Через 15 часов будет ', cells, ' амеб.');
end.