Значение суммы

@Ol'ya · Регистрация: 23.11.2010

Author24 — интернет-сервис помощи студентам

Здравствуйте, подскажите, пожалуйста, как с помощью васика вычислить значение суммы. Я не понимаю как записать сразу все значения от 1 до 14.
Спасибо

@XoFfiCEr · 23.11.2010, 19:02

Сообщение от Ol'ya

Здравствуйте, подскажите, пожалуйста, как с помощью васика вычислить значение суммы. Я не понимаю как записать сразу все значения от 1 до 14.
Спасибо

просто суммировать значения чисел начиная от 1 и до 14? А я понял там сложная формула.
Ну как - по частям вычислять.

@Ol'ya · 23.11.2010, 19:26 **[ТС]**

В смысле, сначала для n=1, потом для n=2......n=14 найти значения. А потом все получившиеся результаты сложить?

Добавлено через 4 минуты
Да, формула сложная. Как именно сумму целиком сразу записать?

Добавлено через 13 минут
Если по отдельности считать, то вообще что-то странное получается:

Visual Basic

Sub Pro1()
Dim n As Double
n = CDbl(InputBox("введите n"))
S1 = Str(1 / (1 * (1 + 1)))
S2 = Str(1 / (2 * (2 + 1)))
S3 = Str(1 / (3 * (3 + 1)))
S4 = Str(1 / (4 * (4 + 1)))
S5 = Str(1 / (5 * (5 + 1)))
S6 = Str(1 / (6 * (6 + 1)))
S7 = Str(1 / (7 * (7 + 1)))
S8 = Str(1 / (8 * (8 + 1)))
S9 = Str(1 / (9 * (9 + 1)))
S10 = Str(1 / (10 * (10 + 1)))
S11 = Str(1 / (11 * (11 + 1)))
S12 = Str(1 / (12 * (12 + 1)))
S13 = Str(1 / (13 * (13 + 1)))
S14 = Str(1 / (14 * (14 + 1)))
S = Str(S1 + S2 + S3 + S4 + S5 + S6 + S7 + S8 + S9 + S10 + S11 + S12 + S13 + S14)
MsgBox ("сумма= ") & CStr(S)
End Sub

@gaw · 23.11.2010, 19:39

Visual Basic

Dim S As Double
Const k = 14
S = 0
For n = 1 To k
S = S + 1 / (n * (n + 1))
Next n
MsgBox ("сумма= ") & S

@Ol'ya · 23.11.2010, 19:45 **[ТС]**

Спасибо, большое!

@Sasha_Smirnov · 24.11.2010, 12:19

Visual Basic

Sub Pro3()
    n = InputBox("введите n", "Ввод числа слагаемых", 14)
    If n = Empty Then Exit Sub
    
MsgBox "сумма 1/(n(n+1)) для n = " & n & " равна " & 1 - 1 / (n + 1) & _
    vbLf & vbLf & "в виде обыкновенной дроби: " & n & "/" & (n + 1), vbInformation
end sub

@XoFfiCEr исследователь 325 / 104 / 3 Регистрация: 18.03.2010 Сообщений: 1,079 Записей в блоге: 2
	23.11.2010, 19:02	2
	Сообщение от Ol'ya Здравствуйте, подскажите, пожалуйста, как с помощью васика вычислить значение суммы. Я не понимаю как записать сразу все значения от 1 до 14. Спасибо просто суммировать значения чисел начиная от 1 и до 14? А я понял там сложная формула. Ну как - по частям вычислять. 0

@Ol'ya 0 / 0 / 0 Регистрация: 23.11.2010 Сообщений: 5
	23.11.2010, 19:45 [ТС]	5
	Спасибо, большое! 0

	24.11.2010, 12:19