50 ! спортсмен в первый день пробежал 10 км. каждый - вопрос №91180535010 от mun7890 02.04.2022 14:12

Question

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

mun7890 · 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)