Visual Basic SOS!

[Dark Sany]

пожалуйста,помогите решить задачу в Visual Basic! Дано натуральное число n>1. Вычислить S=1/2+2/3+3/4+...+n/n+1. это очень важно

[Alex11223]

На Паскале это будет выглядеть так. Думаю переписать это на Бейсике не составит вам труда.

for i:=1 to n do
   s:=s+i/(i+1);

[Jaguar83]

Dim Sum As Double
Dim N As Integer
Sum = 0
N = 10
For i = 1 To N
    Sum = Sum + CDbl(i / (i + 1))
Next

________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Dark Sany]

спасибо большое!!!на какие весы?

[Blondy]

Видите слева, там где ник у Алекса три картинки снизу - по середине весы))) Нажимайте, не бойтесь.... мы так благодарим друг друга))

[Dark Sany]

я и не боюсь,милая))просто сначала не видел