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

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

Найти нужный

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

Информатика . 7 класс. ФГОС. Итоговая контрольная работа. 6. Тип файла можно определить, а) размер б) расширение в) дату создания д) размещение 1. 7.... Напишите команды выборки для получения справки с использованием сложных логических выражений: • определить все даты до 17 марта, когда температура был... 1) Что такое 3D- графика? Какие здесь есть измерения? 2) Какие программы для 2D- и 3D- графики вы знаете? 3) Что за программа SketchUp? Как ее запусти... Названия планет в алфавитном порядке!!! Срочно!! плиззззз... Как вызывается контекстное меню?...