2. 工程
  3. 阅读以下FORTRAN程序： INTEGERX(7) DATAX／10，20，45，70，80，15，14／ M／X(1) DO10I=2．7 IF(X(I)．GIM)THEN M：X(I) K=1 ENDIF 10CONTINUE N=X(K) X(K)

阅读以下FORTRAN程序： INTEGERX(7) DATAX／10，20，45，70，80，15，14／ M／X(1) DO10I=2．7 IF(X(I)．GIM)THEN M：X(I) K=1 ENDIF 10CONTINUE N=X(K) X(K)

admin2008-02-07  14
问题 阅读以下FORTRAN程序：
INTEGERX(7)
DATAX／10，20，45，70，80，15，14／
M／X(1)
DO10I=2．7
IF(X(I)．GIM)THEN
M：X(I)
K=1
ENDIF
10CONTINUE
N=X(K)
X(K)=X(I)
X(I)=N
WRITE(*，100)(X(I)，I=1，7)
100FORMAT(2X，713)
END
程序运行的结果是：
选项 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。
转载请注明原文地址:https://jikaoti.com/ti/nzPhFFFM
本试题收录于： 供配电（公共基础）题库注册电气工程师分类
0

供配电（公共基础）

注册电气工程师

相关试题推荐
随机试题
最新回复(0)