Страница: 1 |
Вопрос: Помогите с задачей со знаком суммы (сигма) | Добавлено: 09.02.06 23:30 |
Автор вопроса: ![]() |
Вычислить сумму S = сигма(знак суммы) (x^2*n)/(n+1)! для x,изменяющегося от 0 до 0,9 с шагом 0,1...где n пробегает ряд чисел от 0 до 12 |
Ответы | Всего ответов: 2 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 10.02.06 00:51 |
снова пошли институтские заданьица ![]() |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | Цитата | #2 | Добавлено: 10.02.06 06:57 |
Я математику не знаю...
Private Sub Command1_Click() Dim S As Double, x As Long, n As Long, Factorial As Double, tim As Long S = 0 tim = Timer For j = 0 To 9 x = j / 10 For n = 0 To 12 Factorial = 1 For i = 2 To n + 1 Factorial = Factorial * i Next i S = S + (x ^ 2 * n) / Factorial Label1.Caption = "x=" & x & vbCrLf & "n=" & n & vbCrLf & "S=" & S & vbCrLf & "Ïðîøëî:" & (Timer - tim) ![]() Next n Next j MsgBox "S=" & S End Sub |
Страница: 1 |
|