zadach244.BAS

{* Задача244 *}

REM basic

' В первый день тренировок спортсмен проплыл 4 км. Каждый следующий день он
' увеличивал дневную норму на 10%.
' Определить: Сколько км он проплывет за 20 тренировок.


CLS


d = 4                      
s1 = d
                        
For i = 2 To 20
        d = d * 1.1
        s1 = s1 + d
                       
Next i
        PRINT " Эа 20 тренировок проплывет "; s1; "км"

End