RosettaCodeData/Task/Fibonacci-sequence/Yabasic/fibonacci-sequence-3.basic

4 lines
85 B
Text
Raw Permalink Normal View History

2024-04-19 16:56:29 -07:00
sub fibonacciA (n)
return int(0.5 + (((sqrt(5) + 1) / 2) ^ n) / sqrt(5))
end sub