Calcolare i numeri di Fibonacci

La funzione che calcola i numeri di Fibonacci è un test sul calcolo numerico e sulla chiamata a funzioni.

In Gambas un possibile codice è il seguente:

Public Sub Main()

  Print "Fibonacci(28) = "; Fibonacci(28)

End


Private Function Fibonacci(n As Integer) As Integer
  
  If (n < 2) Then
    Return n
  Else
    Return fibonacci(n - 2) + Fibonacci(n - 1)
  Endif
 
End