1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | DIM A( 1 TO 5 , 1 TO 5 ) FOR i = 1 TO 5 FOR j= 1 TO 5 PRINT "A("; i; ","; j; ") = " INPUT "", A(i,j) NEXT j NEXT i FOR i = 1 TO 5 FOR j= 1 TO 5 IF i>j THEN tmp=A(i,j) A(i,j)=A(j,i) A(j,i)=tmp END IF NEXT j NEXT i |