Finalmente alguém para explicar direito esse algoritmo de Fibonacci com função recursiva. Na maioria das aulas que eu assisti, os professores só jogavam o código e explicavam por cima, e eu nunca entendia direito, kk. Mas dessa vez eu consegui. Muito obrigado!
Boa noite. Obrigado por compartilhar! Sua lógica funciona até no VBA (rs): Public Function fiboRD(ByVal n As Long) If n < 3 Then fiboRD = 1 Else fiboRD = fiboRD(n - 1) + fiboRD(n - 2) End If End Function '------------------------------------------------------- Sub AlgRD() Dim res As Long res = fiboRD(20) Debug.Print res End Sub Output: 6765
Finalmente alguém para explicar direito esse algoritmo de Fibonacci com função recursiva. Na maioria das aulas que eu assisti, os professores só jogavam o código e explicavam por cima, e eu nunca entendia direito, kk. Mas dessa vez eu consegui. Muito obrigado!
Boa noite.
Obrigado por compartilhar!
Sua lógica funciona até no VBA (rs):
Public Function fiboRD(ByVal n As Long)
If n < 3 Then
fiboRD = 1
Else
fiboRD = fiboRD(n - 1) + fiboRD(n - 2)
End If
End Function
'-------------------------------------------------------
Sub AlgRD()
Dim res As Long
res = fiboRD(20)
Debug.Print res
End Sub
Output: 6765
Eu que agradeço o feedback!