zadach125.BAS

{* Задача125 *}

REM basic

' Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько клеток будет через N суток (в сутках 24 часа)


cls
Input «введите количество суток»; N
S=1 
        у=N*24
For x=3 To у Step 3
S=S*2
        Next x
PRINT « через» N «суток будет» S «клеток»
End