阅读下列FORTRAN程序NTECER x（s, 3）,ADATA X/1,2,3,4,5,6, 7

阅读下列FORTRAN程序NTECER x（s, 3）,ADATA X/1,2,3,4,5,6, 7,8,9/DO 10 I=1, 3DO 10 J=I+1,3A=X（I, J）X（I, J）=X（J, I） .X（J, I）=A .10 ConTINUEWRITE （*, 20） （（X（I,J）,J=1,8）,I=1, 3）20 FORMAT（1x, 312）END运行_上述程序后，其输出是（）

A、

B、

C、

D、

参考答案

【正确答案：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.。