fibonacci_recursivo.erl 298 Bytes
Newer Older
kenkeiras's avatar
kenkeiras committed
1 2 3
-module(fibonacci_recursivo).
-export([start/0, fibonacci/1]).

4
fibonacci(0) -> 0;
kenkeiras's avatar
kenkeiras committed
5
fibonacci(1) -> 1;
6 7
fibonacci(N) -> fibonacci(N - 1) + fibonacci(N - 2).

kenkeiras's avatar
kenkeiras committed
8

9 10 11 12
start() -> 
     Numero = 10,
     Resultado = fibonacci(Numero),
     io:format("Elemento nº ~p de fibonacci: ~p~n", [Numero, Resultado]).