11 lines
214 B
Text
11 lines
214 B
Text
|
10 LINE INPUT "Type an expression: ",A$
|
||
|
|
20 OPEN "CHAIN.TMP" FOR OUTPUT AS #1
|
||
|
|
30 PRINT #1, "70 LET Y=("+A$+")"
|
||
|
|
40 CLOSE #1
|
||
|
|
50 CHAIN MERGE "CHAIN.TMP",60,ALL
|
||
|
|
60 FOR X=0 TO 5
|
||
|
|
70 REM
|
||
|
|
80 PRINT X,Y
|
||
|
|
90 NEXT X
|
||
|
|
100 GOTO 10
|