阅读下列FORTRAN程序 INTEGER X(3,3),A DATA X/1,2,3,4,5,6.7,8,9/ DO10I=1.3 DO10J=1+1.3 A=X(I,J) X(I,J)=X(J,I) X(J,I)=A 10CONTINUE WRITE(

admin2017-08-07  14

问题 阅读下列FORTRAN程序
INTEGER X(3,3),A
DATA X/1,2,3,4,5,6.7,8,9/
DO10I=1.3
DO10J=1+1.3
A=X(I,J)
X(I,J)=X(J,I)
X(J,I)=A
10CONTINUE
WRITE(*,20)((X(I,J),J=1,3)I=1,3)
20PORMAT(IX,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。
第一次循环:I=1,J=2,A=X(1,2)=4,X(1,2)=X(2,1)=2,X(2,1)=4,以此类推得到结果。
转载请注明原文地址:https://jikaoti.com/ti/sSuhFFFM
0

最新回复(0)