50 ! спортсмен в первый день пробежал 10 км. каждый - вопрос №91180535010 от annaorlova2 13.07.2021 16:26

Question

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

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