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

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

Найти нужный

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

На Новый год в детском саду обычно наряжают ёлку и ставят вокруг неё n стульев. Далее включают весёлую музыку, под которую вокруг ёлки бегают m детише... 1. Какую информацию может обрабатывать КОМПЬЮТЕР? 2. Для ввода какой информации предназначены микрофон, сканер, цифровая камера? 3. Для чего нужна кл... A = 7*[5] print(len(A)) Определите результат работы программы.... 8. Строки электронной таблицы: а) именуются пользователем произвольным образом; б) обозначаются буквами русского алфавита А... Я; в) обозначаются букв... Полный путь к файлу имеет вид C:\Study\English_city_1.ppt.Указать расширение этого файла...