11 lines
175 B
Text
11 lines
175 B
Text
10 READ n
|
|
20 DIM d$(n,5)
|
|
30 FOR i=1 TO n
|
|
40 READ d$(i)
|
|
50 NEXT i
|
|
60 DATA 3,"iced","jam","plain"
|
|
70 FOR i=1 TO n
|
|
80 FOR j=i TO n
|
|
90 PRINT d$(i);" ";d$(j)
|
|
100 NEXT j
|
|
110 NEXT i
|