Вычислить сумму n элементов числового ряда - VB (61044)
Формулировка задачи:
Вычислить сумму n элементов числового ряда S=(60+30/36)-(61+29/37)+(62+28/38)-(63+27/39)
Решение задачи: «Вычислить сумму n элементов числового ряда»
textual
Листинг программы
Dim n!, i!, s!
n = InputBox("n")
s = 0
For i = 1 To n
s = s + (-1) ^ (1 + i) * (59 + i + (31 - i) / (35 + i))
Next i
MsgBox s