Question

How to print fibonacci series in reverse order using recursion in VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Sub fib(ByVal n As Integer, ByVal a As Integer, ByVal b As Integer)
        If n > 0 Then
            fib(n - 1, b, a + b)
            Console.Write(a & " ")
        End If
    End Sub

    Public Shared Sub Main(ByVal args As String())
        Dim N As Integer = 12
		
        fib(N, 0, 1)
    End Sub
End Class





' run:
'
' 89 55 34 21 13 8 5 3 2 1 1 0
'

 

70+ SQL courses for beginners and professionals