zadach139.BAS

{* Задача139 *}

REM basic

' Каждая бактерия делится на две через 1 минуту. В начальный момент имеется 1 бактерия. Сколько бактерий будет через N минут?


CLS
INPUT N
For I = 1 To N
k = 2 * I
Next I
PRINT «Количество бактерий=»; k
End