here are the first 9 Fibonacci numbers
'https://www.futilitycloset.com/2015/06/28/made-to-order-4/
n# = 9899
r# = 1000 / n#
f$ = STR$(r#)
f$ = "000" + MID$(f$, 3)
FOR i = 1 TO 18 STEP 2
PRINT MID$(f$, i, 2)
NEXT
with multi-precision arithmetic this can be expanded to give more numbers
the reason for dividing 1000 by n instead of 1 by n is to avoid exponential notation in the string f