20 lines
217 B
Plaintext
20 lines
217 B
Plaintext
set &a 0
|
|
set &b 1
|
|
set &n 92
|
|
|
|
set &i 0
|
|
@loop
|
|
equal $i $n &done
|
|
if $done %end
|
|
|
|
add $a $b &temp
|
|
set &a $b
|
|
set &b $temp
|
|
|
|
add $i 1 &i
|
|
jump %loop
|
|
|
|
@end
|
|
println "Fibonacci result:" $a
|
|
end
|