Вычисление дохода по вкладу - VB
Формулировка задачи:
2. Написать программу, вычисляющую доход по вкладу. Исходными данными для вычисления являются: величина вклада, процентная ставка (годовых) и срок вклада (количество дней).
Решение задачи: «Вычисление дохода по вкладу»
textual
Листинг программы
Sub vklad()
Dim vkl, doh As Double
Dim proc, days As Integer
vkl = InputBox("Введите величину вклада")
proc = InputBox("Введите процентную ставку (годовых)(%)")
days = InputBox("Введите срок вклада (дней)")
doh = vkl * ((1 + (proc / 100))) ^ (days / 365)
Print "Доход", Format(doh, "0.00")
End Sub