Radio Shack TRS-80 PC-3 Owner's Manual page 166

Examples
10 DIM 8(10) Set up an array.
20 FOR 1=1 TO 10
30 READ 8(1)
Assigns the value 10 to each of the elements of B( ).
40
RESTORE
50 NEXT I
60 DATA 10
166