阅读以下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 程序运行的结果是:

2023-06-04

A. 10 20 45 70 80 15 14
B. 14 20 45 70 80 15 10
C. 80 20 45 70 10 15 14
D. 20 45 70 80 15 14 10


参考答案:C

解利用DATA语句赋值,X(1)=10,X(2)=20,X(3)=45,X(4)=70,X(5)=80,X(6)=15,X(7)=14。
答案:C

相关推荐