15 lines
261 B
Text
15 lines
261 B
Text
10 DIM A$(3)
|
|
20 DIM B$(3)
|
|
30 DIM C$(3)
|
|
40 A$(1)="THIS"
|
|
50 A$(2)=" LOOPS"
|
|
60 A$(3)=" ARRAYS"
|
|
70 B$(1)=" NS-HUBASIC"
|
|
80 B$(2)=" OVER"
|
|
90 B$(3)=" AT"
|
|
100 C$(1)=" PROGRAM"
|
|
110 C$(2)=" MULTIPLE"
|
|
120 C$(3)=" ONCE."
|
|
130 FOR I=1 TO 3
|
|
140 PRINT A$(I)B$(I)C$(I)
|
|
150 NEXT
|