20 lines
149 B
Text
20 lines
149 B
Text
|
|
define a = 1, b = 1, s = 0, i = 0
|
||
|
|
|
||
|
|
cls
|
||
|
|
|
||
|
|
print "Fibonacci Sequence"
|
||
|
|
|
||
|
|
do
|
||
|
|
|
||
|
|
let s = a + b
|
||
|
|
let a = b
|
||
|
|
let b = s
|
||
|
|
+1 i
|
||
|
|
|
||
|
|
print s
|
||
|
|
|
||
|
|
loop i < 20
|
||
|
|
|
||
|
|
pause
|
||
|
|
end
|