zadach121.BAS

{* Задача121 *}

REM basic

' Царевна – лягушка съедает ежедневно на 20 % комаров больше, чем в предыдущий день и еще 3 комара. Написать программу определяющую, сколько комаров она съест в 20-й день, если в первый день она съела 8 комаров.


S=8
For I=1 To 19
S= s+s*0.2+3
Next I
PRINT” на”; I “ день лягушка съест “; s “комаров”
End