' ---------------------------
' Fibonacci Series
' ---------------------------
initialValue = 0
finalValue = 1
tempValue = 10
count = 10

' count contains the number of elements to be generated.....

for count = 1 to 200
tempValue = initialValue + finalValue
print count;chr$(9);initialValue
initialValue = finalValue
finalValue = tempValue
next count