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

Examples
HI DIM B(1(1)
2(1 FOR I
=
1 TO 1(1
3(1 READ B(I)
40 NEXT I
50 DATA 1,2,3,4,5,6
70 DATA 7,8,9,1(1
Sets up an array.
Loads the values from the DATA statement into B(
I.
B(1
I
will be 1, B(2) will be 2, B(3) will be 3, etc.
127