Одноклеточная амёба каждые 3 часа делится на 2 клетки. Определить через сколько часов амёба станет больше 200. написать программу на языке Pascal ABC.
Одноклеточная амёба каждые 3 часа делится на 2 клетки. Определить через сколько часов амёба станет больше 200. написать программу на языке Pascal ABC.
Гость
Ответ(ы) на вопрос:
Гостьvar a,t:integer;
begin
t:=0; a:=1;
while a<200 do begin
a:= a*2;
t:=t+3 ;
end;
write (t);
end.
Не нашли ответ?
Похожие вопросы