Табулирование функции и суммы ряда - НЕ ВЫВОДИТСЯ СУММА

[Firstaid]

Сообщение от Aleksandr H.

да потому что Faktn возвращает 0 всегда

Он не должен возвращать 0, он должен факториал считать, а он его не считает. Уже недели две бьюсь на этой хренью и никак не пойму

[Аватар]

Ни чего не должен. Результат функции не присвоен, поэтому и 0

[Firstaid]

Сообщение от Аватар

Ни чего не должен. Результат функции не присвоен, поэтому и 0

А как должно быть, я не пойму? Напишите правильно, чтобы он считал факториал

[Serge_Bliznykov]

Сообщение от Firstaid

А как должно быть, я не пойму? Напишите правильно, чтобы он считал факториал

https://docs.microsoft.com/en-us/dot...ion-procedures

Private Function Factn(n) As Double
Dim F As Double, i As Integer
F = 1
For i = 2 to n
  F = F * i
Next i
Return F
End Function

обращаться вот так:
вместо (2n)! пишем

Factn(2*n)

p.s. а вообще, в таком ряду удобно использовать реккурентную формулу (это на что нужно умножить очередной член ряда, чтобы получить следующий -
такую формулу в общем виде можно получить, если разделить n+1 элемент ряда на n-й элемент ряда)
___

[Firstaid]

Сообщение от Serge_Bliznykov

https://docs.microsoft.com/en-us/dot...ion-procedures

Private Function Factn(n) As Double
Dim F As Double, i As Integer
F = 1
For i = 2 to n
  F = F * i
Next i
Return F
End Function

обращаться вот так:
вместо (2n)! пишем

Factn(2*n)

Синтаксическая ошибка:

[Serge_Bliznykov]

ну, я же говорил, что я ваш VB не знаю..

попробуйте убрать "As Double" из описания функции

[Firstaid]

Сообщение от Serge_Bliznykov

ну, я же говорил, что я ваш VB не знаю..

попробуйте убрать "As Double" из описания функции

Ну а кто знает? Неужели тут нет таких, кто знает?

[Serge_Bliznykov]

Сообщение от Firstaid

Ну а кто знает? Неужели тут нет таких, кто знает?

Вот Вы изучите язык и будете знать.

p.s. а что, не получилось убрать As Double ?

Private Function Factn(n)
....

[Firstaid]

Сообщение от Serge_Bliznykov

Вот Вы изучите язык и будете знать.

p.s. а что, не получилось убрать As Double ?

Private Function Factn(n)
....

Да убрать-то я убрал, только ничего это не меняет

[Аватар]

Private Function Factn(n As Integer) As Double