8 lines
276 B
Text
8 lines
276 B
Text
|
STO 0 // Nth term requested := User input
|
||
|
|
1 STO 1 // Last term := 1
|
||
|
|
0 // Initial value: 0
|
||
|
|
+ *EXC 1 = // Calculate next term.
|
||
|
|
*dsz 0 6 // Loop while R0 positive
|
||
|
|
R/S // Done, show answer
|
||
|
|
GTO 0 6 // If user hits R/S calculate next term
|