RosettaCodeData/Task/Fibonacci-sequence/Mathematica/fibonacci-sequence-7.math

3 lines
100 B
Plaintext

fib[n] /. RSolve[{fib[n] == fib[n - 1] + fib[n - 2], fib[0] == 0,
fib[1] == 1}, fib[n], n][[1]]