1. 

   Caterina Valente New Member

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

    

   Caterina Valente, 28 янв 2010

   #1
2. 

   00Asder0 New Member

   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.
    
   вот так)

    

   00Asder0, 28 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня