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

1 ответ

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

Megamozg

2205

Var
amoebas, t: integer;

begin
amoebas := 1;
t := 0;

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

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

4 апреля 2023 12:06

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

Найти нужный

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

СРОЧНО!!! НА ПИТОНЕ!!! ДАЮ 100 БАЛЛОВ!!! Быстрое возведение в степень Возводить в степень можно гораздо быстрее, чем за n умножений! Для этого нужно в... Перепишите программу на языке Паскаль, исправив ошибки: Program primer Var a,b: integer; Begin ; ReadLn( a,b); s=a+b; m:=a*b; d:=a:b; WriteLn(s); Writ... Как записать степень в паскале. помогите... Два текста содержат одинаковое количество символов. Первый текст составлен из символов алфавита мощностью 16, а второй текст - из символов алфавита мо... Чем маркированный список отличается от нумерованного...