Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1710 б
- arkasha_bortnikov 895 б
- Dwayne_Johnson 860 б
27 декабря 2022 10:57
897
Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько будет амеб через 3,6,9,12, .... 24 часа (pascal)
1
ответ
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.
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.
0
·
Хороший ответ
29 декабря 2022 10:57
Остались вопросы?
Еще вопросы по категории Информатика
Цифровой вольтметр измеряет величину напряжения с точностью до 0,1 Вольта. Определите минимальное количество бит на каждое значение напряжения, если м...
1.Объем сообщения содержащего 4096 символов составил 1/512 часть Мегабайта. Какова мощность алфавита, с помощью которого записано это сообщение? 2.Для...
ИЗВЕСТНО,ЧТО СООБЩЕНИЕ УЧИТЕЛЯ ,О ТОМ ЧТО К ДОСКЕ ПОЙДЁТ САША ОРЛОВ ,СОДЕРЖИТ 5 БИТОВ ИНФОРМАЦИИ . СКОЛЬКО УЧЕНИКОВ В КЛАССЕ?...
Помогите написать программу в python Уровень C. Напишите программу, которая получает возраст человека (целое число, не превышающее 120) и выводит этот...
Помогите пожалуйста нужно СРОЧНО! 1.Приведите примеры знаковых систем. Какова может быть физическая природа знаков? 2.В чем состоит различие между ес...
Все предметы