решите задачу в паскале используя цикл на своё усмотрение.
Одноклеточная амёба каждые 3 часа делится на 2 клетки.Определить сколько будет клеток через 3,6,9,12,15,18,21,24 часа
Ответы
Ответ дал:
0
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.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад