RosettaCodeData/Task/Fibonacci-sequence/Ring/fibonacci-sequence.ring

8 lines
172 B
Plaintext

give n
x = fib(n)
see n + " Fibonacci is : " + x
func fib nr if nr = 0 return 0 ok
if nr = 1 return 1 ok
if nr > 1 return fib(nr-1) + fib(nr-2) ok