mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Fibonacci-sequence/IDL/fibonacci-sequence-3.idl

5 lines
79 B
Plaintext
Raw Permalink Blame History

function fib,n
q=1/( p=(1+sqrt(5))/2 )
return,round((p^n+q^n)/sqrt(5))
end
Reference in New Issue View Git Blame Copy Permalink