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

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

Найти нужный

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

Постройте черно-белый рисунок шириной 8 пикселей, закодированный шестнадцатеричной последовательностью 2466FF6624. если можно пошагово... Символы, которые можно использовать для записи программы: 5 f G Э ы... Какие из чисел удовлетворяют условию (x % 4 == 0 and x % 100 != 0) or x % 400 == 0? ... Чертёжнику был дан для исполнения следующий алгоритм: Повтори 3 раз Команда1 Сместиться на (3, 3) Сместиться на (1, –2) Конец Сместиться на (–6... В одной из кодировок unicode каждый символ кодируется 16 битами. Определите размер следующего предложения в данной кодировке:*Это огромный секрет, име...