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

1 ответ

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

Megamozg

2200

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

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

Найти нужный

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

Помогите не могу разгадать ребус. Дам за правильный ответ 50 баллов!... Премиальный фонд института распределяется между отличниками всех курсов поровну и участниками КВН и олимпиад. На отличников уходит 40% всех денег. Каж... Что такое знак? Приведите примеры знаков, используемых в общении людей.... Минимальным объектом, используемым в растровом графическом редакторе, является: * 1.Точка экрана (пиксель) 2.Символ 3.Геометрическая фигура... Во входных данных - строка из чисел, разделённых пробелом. Напишите программу, которая считывает данные в массив, преобразуя при этом символьные зн...