11 lines
268 B
Text
11 lines
268 B
Text
10 DIM A$(9) :REM DECLARE STRING ARRAY
|
|
20 REM *** FILL ARRAY WITH WORDS ***
|
|
30 FOR I = 0 TO 8
|
|
40 READ A$(I)
|
|
50 NEXT
|
|
60 REM *** PRINT ARRAY CONTENTS ***
|
|
70 FOR I = 0 TO 8
|
|
80 PRINT A$(I)" ";
|
|
90 NEXT
|
|
100 END
|
|
1000 DATA THE, QUICK, BROWN, FOX, JUMPS, OVER, THE, LAZY, DOG.
|