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

4 lines
85 B
Plaintext

sub fibonacciA (n)
return int(0.5 + (((sqrt(5) + 1) / 2) ^ n) / sqrt(5))
end sub