RosettaCodeData/Task/Fibonacci-sequence/Arturo/fibonacci-sequence.arturo
2023-07-01 13:44:08 -04:00

8 lines
111 B
Text

fib: $[x][
if? x<2 [1]
else [(fib x-1) + (fib x-2)]
]
loop 1..25 [x][
print ["Fibonacci of" x "=" fib x]
]