[单选题]

阅读下列FORTRAN程序
  INT EGER X(3,3),A
  DATA X /1,2,3,4,5,6,7,8,9/
  D0 10 1=3
  D0 10 J=1+3
  A=X(1,J)
  X(1,J)=X(J,I)
  X(J,I)=A
  10 CONTINUE
  WRITE(*,20)((X(1,J),J=1,3)I=1,3)
  20 PORMAT(IX,312)
  END
  运行上述程序后,其输出是(  )。

A.

B.

C.

D.

参考答案与解析:

相关试题

阅读下列FORTRAN程序<br />  INT EGER X(3,3),A<br />  DATA X /1,2,3,4,5,6,7,8,9/<br />  D0