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

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

Найти нужный

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

Какая формула соответствует поиску документа с цитатой из трех слов? Игра| Инженер | Задача Игра Инженер Задача "Игра *Инженер Задача" "Игра Инж... посчитать и вывести значение функции y=1/(2+|x|) на отрезке от 4 до 10 с шагом 2... 1. Для долговременного хранения информации служит: А) оперативная память. Б) процессор. В) внешняя память 2. При отключении компьютера от сети информ... 1) Кегель - это : A. начиртание шрифта. B. Размер шрифта. C. Элемент абзаца. D. Маркер на линейке формирования. 2) Вывод перечня символов, в то... Что такое контроллер?какую функцию он выполняет?...