Каждая бактерия делится на 2 через каждые 2 минуты. В начальный момент имеется 1 бактерия. Написать программу, определяющую сколько их будет через n минут.

Question

Мишуня

28 июня, 03:37

+4

Ответы (1)

Знаете ответ?

Верка · Answer 1

var n, i : integer;

b : real;

begin

readln (n) ;

b:=1;

for i:=1 to n div 2 do

begin

B:=B*2;

end;

writeln (b) ;

end.

вот так)