PROG : 16509
D-FILE: 16992
VARS : 17785
E-LINE: 17786
STKBOT: 17786
STKEND: 17786
9999 means line number
PRINT means treat as KEYWORD P
10 REM ***INPUT TWO***
20 REM 1984/SLR
30 DIM A$(10,2,10)
40 PRINT "INPUT 10 WORDS"
50 FOR A=1 TO 10
60 PRINT "WORD:";A
70 INPUT A$(A,1)
80 NEXT A
90 CLS
100 PRINT "PLEASE WAIT..."
105 FOR A=1 TO 10
110 FOR D=1 TO 10
120 LET A$(A,2,D)=A$(A,1,10-D+1
)
130 NEXT D
140 NEXT A
150 CLS
160 PRINT "YOUR 10 WORDS FORWAR
D AND BACK- WARDS ARE:"
170 FOR A=1 TO 10
190 PRINT A$(A,1);A$(A,2)
200 NEXT A
210 PRINT "THATS ALL..."
220 PAUSE 4E4
230 CLS
240 RUN
300 SAVE "IN2"
310 RUN