zadach245.BAS

{* Задача245 *}

REM basic

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


CLS
d = 4                      
t = 1
Do
        t = t + 1          
        d = d * 1.1        
        s2 = s2 + d        
Loop Until s2 >= 100
        PRINT " 100 км будет пройдено за"; t; "дней"

End