阅读以下FORTRAN程序:INTEGER X(7)DATA X/10,20,45,70,80,15,14/M/X(l)DO 10 1=2,7IF(X(I).GIM)THENM=X(I)K=1 END IF 10 CONTINUEN=X(K)X(K)=X(I)X(I)=NWRITE( *,100)(X(I),I=1,7)100 FORMAT(2X,713)END 程序运行的结果是:
单选题
阅读以下FORTRAN程序: INTEGER X(7) DATA X/10,20,45,70,80,15,14/ M/X(l) DO 10 1=2,7 IF(X(I).GIM)THEN M=X(I) K=1 END IF 10 CONTINUE N=X(K) X(K)=X(I) X(I)=N WRITE( *,100)(X(I),I=1,7) 100 FORMAT(2X,713) END 程序运行的结果是: