Como calcular la secuencia fibonacci en DrRacket
hay que tener en cuenta que la sucesión de fibonacci es una secuencia matemática infinita compuesta de números naturales, por ello hay que tener en cuenta que se debe tener un punto de parada o de lo contrario seguirá ejecutando el proceso hasta saturar el sistema.
Fórmula: F(n) = F(n-1) + F(n-2)
Ejemplo: F(5)= 1, 1, 2, 3, 5, 8.
F(5) = 8
Código
; ===========================================================================
; Autor: Jorge isaac peña caceres
; Fecha: 01/10/2018
;contrato: calcular-fibo: numero -> numero
;descripcion: calcular la secuencia fibonacci
;----------------------------------------------------------------------------
(define (Calcular-fibo x)
(cond
[(= x 0) 1]
[(= x 1) 1]
[else (+ (Calcular-fibo (- x 1)) (Calcular-fibo (- x 2)))]
))
;Prueba:
(Calcular-fibo 5)
; ===========================================================================
Te puede interesar: Factorial en DrRacket
Cómo calcular la serie Fibonacci con recursividad
Si después de ver el ejemplo 1 no te queda claro de como hacerlo te dejamos un pequeño video tutorial que encontramos en youtube subido por: Carlos Eduardo quien explica más detalladamente el proceso.
Enunciado: Se define la serie de Fibonacci como la serie que comienza con los dígitos 1 y 0 y va sumando progresivamente los dos últimos elementos de la serie, así: 0, 1, 1, 2, 3, 5, 8, 13, 21, 34.......
hacer un programa de computador, de tal manera que presente la serie de Fibonacci hasta llegar sin sobrepasar el número 10,000.
; ===========================================================================
(define (suma inicio segundo final)
(if (< segundo final)
(begin
(display inicio)
(display " ")
(display segundo)
(display " ")
(suma (+ inicio segundo) (+ (+ inicio segundo) segundo) final)
)
(display inicio)
))
;Prueba
(suma 0 1 10000)
; Resultado: 0 1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765
; ===========================================================================
Toma de pantalla del código
Si no entendiste como es el punto de parada o porque use la función dentro de sí misma lee: Recurcion en Scheme
