RosettaCodeData/Task/Fibonacci-sequence/AutoHotkey/fibonacci-sequence-1.ahk
2023-07-01 13:44:08 -04:00

18 lines
205 B
AutoHotkey

Loop, 5
MsgBox % fib(A_Index)
Return
fib(n)
{
If (n < 2)
Return n
i := last := this := 1
While (i <= n)
{
new := last + this
last := this
this := new
i++
}
Return this
}