RosettaCodeData/Task/Fibonacci-sequence/Lasso/fibonacci-sequence.lasso

24 lines
342 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
define fibonacci(n::integer) => {
2026-04-30 12:34:36 -04:00
#n < 1 ? return false
2023-07-01 11:58:00 -04:00
2026-04-30 12:34:36 -04:00
local(
swap = 0,
n1 = 0,
n2 = 1
)
2023-07-01 11:58:00 -04:00
2026-04-30 12:34:36 -04:00
loop(#n) => {
2023-07-01 11:58:00 -04:00
#swap = #n1 + #n2;
#n2 = #n1;
#n1 = #swap;
2026-04-30 12:34:36 -04:00
}
return #n1
2023-07-01 11:58:00 -04:00
}
fibonacci(0) //->output false
fibonacci(1) //->output 1
fibonacci(2) //->output 1
fibonacci(3) //->output 2