题目内容
（请给出正确答案）
阅读下列FORTRAN程序：
S＝1.0
D010K＝2，4，2
10S＝S+1.0/K
WRITE(*，*)S
END
执行上述程序后，输出的S值为()。
(A)0.75
(B)1.75
(C)0.0
(D)1.0
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“阅读下列FORTRAN程序：S＝1.0D010K＝2，4，210S＝S+1.0/KWRITE（*，*)SEND执行上述程序后，输出的S值为（)。”相关的问题
阅读下列FORTRAN程序： DO 20 K=2，5，2 S=1.0 DO 10 J=K，5 10 S=S+J 20 CONTINUE* WRITE(*，*) S END 执行上述程序后，输出的S值为()。
A．9.0
B．1.0
C．24.0
D．10.0
阅读下列FORTRAN程序： CHARACTER A*5 A='ABCDE' CALL S(A) END SUBROUTINE S(X) CHARACTER X*3 WRITE(*，*)X END 执行上述程序后，输出的X值为()。
A．'AB
B．DE'
C．CDE
D．ABC
阅读下列FORTRAN程序： S=1.0 DO 100 K=3，1，-1 DO 100 N=-1，-3 100 S=2*S WRITE(*，*) S END 运行上述程序后，输出的S值为()。
A．1.0
B．8.0
C．512.0
D．4.0
阅读下列FORTRAN程序： DIMENSION A(3，4) DATA A/3*+4.0，3*-3.0，3*-2.0，3*-1.0/ S=0.0 DO 20 K=1，3 D=A(K，1) DO 10J=2，4 IF(A(K，J)＜D) D=A(K，J) 10 CONTINUE S=S+D 20 CONTINUE WRITE(*，*) S END
A．-15.0
B．-12.0
C．9.0
D．6.0
阅读下列FORTRAN程序： S(X)=2*X*X-Y+1.0 DATA A，B，Y/3*2.0/ P=S(A)*S(B-A)4-S(Y)-S(B) WRITE(*，*) P END 上述程序运行后，输出的P值为()。
A．9.0
B．-9.0
C．7.0
D．-7.0
阅读下列FORTRAN程序：
INTEGER X(7)
DATA X／4，5，7，8，l0，12，11／
D0 10 K=1。7
IF(MOD(X(K)，2)．NE．O)THEN‘
S—S+X(K)
N=N+1
END IF
10 CONTINUE
T—S／N
WRITE(*，20)S，T
20 FORMAT(20X，3F6．1)
END
程序运行后的输出结果是()：
A.23．0 7．7
B.47．0 6．7
C.34．0 8．5
D.57．0 11．4
阅读下列FORTRAN程序： INTEGER S(2，4) ，A(2) DATA S/4*1，4*2/ CALL SUB(S，2，4，A) M=A(1) -A(2) WRITE(*，*) M END SUBROUTINE SUB(S，N，K，A) INTEGER S(N，K)，A(N) DO 20 I=1，N A(I)=0 DO 10 J=1，K 10 A(I)=A(I)+S(I，J) A(I)=A(I)/K 20 CONTINUE END 执行上述程序后，输出的M值为()。
A．0
B．1
C．2
D．3
阅读下列FORTRAN程序： DIMENSION A(6) READ(*，*)(A(I)，I=1，6) DO 10 K=1，3 S=A(K) A(K)=A(7-K) A(7-K)=S 10 CONTINUE WRITE(*，20)(A(I)，I=1，6) 20 FORMAT(1X，2I) END 上述程序运行时，若由键盘输入1，2，3， 4，5，6，则输出的结果为()。
A．1 2 3 4 5 6
B．1 4 2 5 3 6
C．6 5 4 3 2 1
D．6 3 5 2 4 1
阅读FORTRAN程序：
READ(*，*)N
D0 10 K=1，N
S=S+K**2
10 CONTINUE
WRITE(*，l00)S
100 FORMAT(2X，F8．O)
END
键盘输入5则程序运行后的输出结果是()。
A.35
B.45
C.65
D.55
阅读下列FORTRAN程序： DO I=1，5 SUM=SUM+I ENDDO WRITE(*，*) SUM END 上述程序运行后，输出结果是()。
A．15
B．15.0
C．不确定
D．0
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
