10 REM FIBONACCI SEQUENCE TERMS 20 FOR X = 1 TO 100 30 Y = (((3.236067977#^X)-(-1.236067977#^X)))/((2^X)*(2.236067977#)) 35 IF Y < 32767 THEN Y = CINT(Y) 36 IF Y > 1E+10 THEN 60 40 LPRINT X;Y 50 NEXT X 60 PRINT "THAT'S ALL FOLKS"