RosettaCodeData/Task/Fibonacci-sequence/ALGOL-68/fibonacci-sequence-3.alg

3 lines
77 B
Plaintext

PROC recursive fibonacci = (INT n)INT:
( n < 2 | n | fib(n-1) + fib(n-2));