9 lines
138 B
Text
9 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
|