Рекурсивная функция - VB
Формулировка задачи:
Написать реализацию рекурсивной функции, вычисляющую n-ый
элемент ряда Фибоначчи, но без экспоненциально растущей рекур-
сии
Замечание:
Нужно создать две функции: одна вызывается непосредственно из main и вы-
зывает вторую, вспомогательную, которая и является рекурсивной.
Прошу помощи, на учебе совсем завал
Решение задачи: «Рекурсивная функция»
textual
Листинг программы
Function Fib(n As Integer, Optional c As Long = 0, Optional p As Long = 1) As Long If (n = 0) Then Fib = c Else Fib = Fib(n - 1, c + p, c) End If End Function Sub test() For i% = 1 To 40 Debug.Print Fib(i%) Next i% End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д