RosettaCodeData/Task/Fibonacci-sequence/ALGOL-68/fibonacci-sequence-3.alg
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

2 lines
77 B
Text

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