Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
3 апреля 2023 06:26
975
Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3, 6, 9,..., 24 часа, если первоначально была одна амеба.
1
ответ
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
0
·
Хороший ответ
5 апреля 2023 06:26
Остались вопросы?
Еще вопросы по категории Информатика
Замена реального объекта его формальным описанием-это: А)Анализ Б)Моделирование В)Формализация Г)Алгоритмизация...
Каких правил надо придерживаться при составлении таблиц информатика пж помогите надо сейчас...
1.Отметьте все операторы, в результате выполнения которых на экран выводится значение переменной a. 1)read(a);2)write(a);3)a:=25;4)write('Ответ...
Помогите, пожалуйста, очень нужно! Срочно!:( 1) Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы вычис...
Вариант 4 1. В каком веке появились первые электрические арифмометры? А) В XIV в.; В) в XVI в.; С) в XVII в.; D) в XIX в. 2. В каком веке появились...