INTEGER X(3,3),A
DATA X/1,2,3,4,5,6,7,8,9/
DO 10 I=1,3
DO 10 J=I+1,3
A=X(I,J)
X(I,J)=X(J,I)
X(J,I)=A
10 CONTINUE
WRITE(*,20)((X(I,J),J=1,3),I=1,3)
20 FORMAT(1x,312)
END
运行上述程序后，其输出是()。
A．1 4 7
2 5 8
3 6 9
B．1 2 3
4 5 6
7 8 9
C．9 6 1
8 5 2
7 4 3
D．9 8 7
6 5 4
3 2 1
参考答案