8 lines
138 B
Text
8 lines
138 B
Text
10 REM FIBONACCI SEQUENCE
|
|
20 INPUT "ENTER N FOR FIB(N)"N
|
|
30 LET A=0,B=1
|
|
40 FOR I=2 TO N
|
|
50 LET T=B,B=A+B,A=T
|
|
60 NEXT I
|
|
70 PRINT B
|
|
80 STOP
|