Одноклеточная амеба каждые 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

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

Найти нужный

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

Пусть видеопамять компьютера имеет объём 512 кбайт.Размер географической сетки-640х480.Сколько страниц экрана одновременно разместятся в видеопамяти п... Каким будет результат выполнения цикла for i in range 1,15,3 print(i, end="\t") 10 баллов... Чем маркированный список отличается от нумерованного... При регистрации в компьютерной системе каждому пользователю выдаётся пароль, состоящий из 15 символов и содержащий только символы из 12-символьного на... Является ли условным оператором следующая последовательность символов a) if x<y then x:=0 else read (y) б)if x>=y then x:=0; y:= else write (z)...