Одноклеточная амёба каждые 3 часа делится на 2 клетки. Определить через сколько часов...

Question

Одноклеточная амёба каждые 3 часа делится на 2 клетки. Определить через сколько часов амёба станет больше 200. написать программу на языке Pascal ABC.

Answer 1

Var a,t:integer;
begin
t:=0; a:=1;
while a<200 do  begin<br>a:= a*2;
t:=t+3 ;
end;
write (t);
end.

Comments

завтра на уроке проверю, если правильно выведет на экран оценю)