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

1 ответ

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

Megamozg

2205

program fofgogjoj;
var
amebi:integer;
i:integer;
begin
amebi:=1;
for i:=1 to 24 do
begin
if i mod 3 = 0 then
begin
Write('Время ',i,' ');
amebi:=amebi*2;
Write('Амебы ',amebi);
writeln;
end;
end;
end.

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

29 декабря 2022 10:57

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

Найти нужный

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

Доказать (A v B) ^ (-A " B) = В, выполнив эквивалентные преобразования над правой частью и построив таблицу истинности... 1. Объясните, почему следующие предложения не являются высказывания ми 1) какого цвета этот дом? 2) Число х не превосходит единицы. 3) 4x+ 3. 4)... Считая что каждый символ кодируется 8 байтами , оцените объем следующего предложения Из всех птиц мне милее всего жаворонок-певец весны.... Пользователь, перемещаясь из одного каталога в другой, последовательно посетил каталоги LESSONS, CLASS, SCHOOL, D:\ , MYDOC, LETTERS. При каждом перем... Дайте словесное описание алгоритма сложения двух обыкновенных дробей a/b и c/d...