SECTION 56.4: TWO-DIMENSIONAL ARRAYS WITH THE DIM-STATEMENT. BEGIN TEST. *** TEST PASSED *** END TEST. END PROGRAM 56 ** 10 PRINT "PROGRAM FILE 57: ARRAY ASSIGNMENT WITH OPTION BASE 0." 20 PRINT " ANSI STANDARD 6.2, 6.4, 9.2, 9.4, 15.2, 15.4" 30 PRINT 50 OPTION BASE O 90 PRINT "SECTION 57.1: ONE-DIMENSIONAL ARRAYS WITHOUT THE" 320 PRINT "SECTION 57.2: TWO-DIMENSIONAL ARRAYS WITHOUT THE" **** ** 640 PRINT "SECTION 57.3: ONE-DIMENSIONAL ARRAYS WITH THE" 910 PRINT "SECTION 57.4: TWO-DIMENSIONAL ARRAYS WITH THE" 950 DIM N(20,2), P(2,20), R(20,20) 960 FOR I=0 TO 20 970 LET I1=I+1 980 LET N(I,1)=I1 990 LET N(1,2)=-I 1000 LET N(I,0)=1 1010 FOR J=2 TO 0 STEP -1 1020 LET J1=I*J 1030 LET P(J,I)=J1 1040 NEXT J 1050 NEXT I 1060 FOR K=0 TO 20 1070 FOR L=0 TO 20 1080 LET K1=K+L 1090 LET R(K,L)=K1 1100 NEXT L 1110 NEXT K 1120 LET N1=0 1130 LET P1=0 1140 LET R1=0 1150 LET C=O 1160 LET T=0 1170 FOR I=0 TO 20 1180 LET I1=I+1 1190 LET T7=N(I,1) 1200 LET T8=N(1,2) 1210 LET T9=N(1,0) 1220 IF T7 <> I1 THEN 1490 1230 IF T8 <> -I THEN 1490 |