zadach430.BAS

{* Задача430 *}

REM basic

' Найти сумму 1 + 12 + 12^3 + ... 12^n


Sum = 1
For i = 1 To n Step 2
Sum = Sum + 1/2^i
Next
CLS: PRINT Sum
End