50 ! спортсмен в первый день пробежал 10 км. каждый - вопрос №50109117376 от bayramovelnur 19.02.2020 08:00

Question

Информатика: 50 ! спортсмен в первый день пробежал 10 км. каждый следующий день он увеличивает дневную норму на 10% сделайте в vb

bayramovelnur · Answer

Dim days As Double
Dim percent As Double
Dim baseKM As Double
Dim result As Double
days = 7
percent = 10
baseKM = 10
result = baseKM
For i = 1 To days
result += (result * percent) / 100
Next
Print(result)