Вклад по 3 % - VB

Формулировка задачи:

Вы положили N руб. под 3% годовых. Через сколько лет Ваш вклад удвоится?

Код к задаче: «Вклад по 3 % - VB»

textual
Option Explicit
 
Private Sub Command1_Click()
Dim S As Single, q As Single
S = 2#
q = 1.03
Print Log(S) / Log(q)
    
End Sub

7   голосов, оценка 4.000 из 5


СОХРАНИТЬ ССЫЛКУ