单选题 阅读以下FORTRAN程序:INTEGER X(7)DATA X/10,20,45,70,80,15,14/M/X(1)DO10I=2,7IF(X(I).GIM)THENM=X(I)K=1END TF10CONTINUEN=X(K)X(K)=X(I)X(I)=NWRITE(*,100)(X(1),I=1,7)100FORMAT(2X,713)END程序运行的结果是:
【正确答案】 C
【答案解析】解析:利用DATA语句赋值,X(1)=10,X(2)=20,X(3)=45,X(4)=70,X(5)=80,X(6)=15,X(7)=14。在读取置换后,X(1)=80,X(2)=20,X(3)=45,X(4)=70,X(5)=10,X(6)=15,X(7)=14。