单选题阅读下列FORTRAN程序INTEGER X(3，3)，ADATA X／1，2，3，4，5，6．7，8，9／DO10I=1．3DO10J=1+1．3A=X(I，J)X(I，J)=X(J，I)X(J，I)=A10CONTINUEWRITE(*，20)((X(I，J)，J=1，3)I=1，3)20PORMAT(IX，312)END运行上述程序后，其输出是：

【正确答案】 B

【答案解析】解析：开始赋值按列主序赋值：X(1，1)=1，2，X(3，1)=3，X(1，2)4=，X(2，2)=5，X(3，2)=6，X(1，3)=7，X(2，3)=8，X(3，3)=9。第一次循环：I=1，J=2，A=X(1，2)=4，X(1，2)=X(2，1)=2，X(2，1)=4，以此类推得到结果。