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

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

Найти нужный

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

1. Сколько бит содержится в 173,25 килобайтах ? 2. Сколько Сколько бит содержится в 16,75 байтах? 3. терабайтов содержится в 6363 гигабайтах ? 4. Ск... Алгоритмом называется...... Для полей однотабличной базы данных КОЛЛЕКЦИЯ (код, НАЗВАНИЕ ЭКСПОНАТА, АВТОР, МЕСТО ИЗГОТОВЛЕНИЯ , ГОД ИЗГОТОВЛЕНИЯ , ФИО ПРЕДЫДУЩЕГО ВЛАДЕЛЬЦА, ДАТА... 1. Указать результат при работе с файлами file = open ("Input.txt", "a") file = open ("Input.txt", "w") file = open ("Input.txt", "r" ) Открывает файл... Запиши ответ Татьяна редактировала фотографию своей подруги. После выполненной работы она хотела отослать фотографию через специальный сервис, чтобы...