题目内容
（请给出正确答案）
阅读下列FORTRAN77程序段：
S＝0.0
DO10J＝0，N
S＝S+X
X＝X+0.5
10CONTINUE
下面程序段中与上述程序段等价的是()。
(A)
S＝X
J＝0
101F(J.LT.N)THEN
X＝X+0.5
S＝S+X
J＝J+1
GOT010
ENDIF
(B)
S＝0.0
J＝0
101F(J.LE.N)THEN
J＝J+1
S＝S+X
X＝X+0.5
GOT010
END IF
(C)
S＝0.0
J＝0
10S＝S+K
J＝J+1
X＝X+0.5
1F(J.LE.N)GOTO10
(D)
S＝X
J＝0
10X＝X+0.5
S＝S+X
J＝J+1
1F(J.LT.N)GOTO10
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“阅读下列FORTRAN77程序段：S＝0.0DO10J＝0，NS＝S+XX＝X+0.510CONTINUE下面程序段中与上述程序段等价的”相关的问题
A.0
B. 3
C. 2
D. 4
阅读下列FORTRAN77程序：
EXTERNALPP
INTEGER P，PP，Q(4，4)
DATAQ/1，2，3，4，5，6，7，8，9，10，11，12，13，14，15，16/
WRITE(*，*)P(Q，4，PP)
END
INTEGER FUNCTION PP(B，N)
INTEGERB(N，N)
PP＝0
D010K＝1，N
10PP＝PP+B(K，K)
END
INTEGER FUNCTIONP(B，N，S)
INTEGER S，B(N，N)
P＝0
D()10K＝1，N
10P＝P+S(B，K)
END
运行上述程序后，输出的结果为()。
(A) 55
(B) 56
(C) 57
(D) 58
阅读下列FORTRAN77程序： INTEGER A(3，3) DATA A/1，2，3，4，5，6，7，8，9/ S=0.0 DO 10 I=1，3 J=MOD(I，3)+1 S=S+A(I，J) 10 CONTINUE WRITE(*，*)S END 上述程序运行后，输出的S值为()。
A．15.0
B．12.0
C．18.0
D．24.0
A.9.8
B. 98.7
C. 8.7
D. 87.6
阅读下列FORTRAN77程序：
DIMENSIONM(3，4)
DATAM/4*2，4*1，4*-1/
N＝0
D010K＝1，4
10N＝N十M(1，K)
WRITE(*，*)N
END
运行上述程序后，输出的N的值为()。
(A) 8
(B) 5
(C) 4
(D) 3
A.8
B. 5
C. 4
D. 2
阅读下列FORTRAN77程序： PARAMETER(L=3) INTEGER N(L) DATA N/3*0/ DO 20 I=1，L DO 20 J=1，L N(J)=N(I)+l 20 CONTINUE WRITE(*，*)N(L) END 上述程序运行后，输出的值为()。
A．3
B．5
C．7
D．9
阅读下列FORTRAN77程序：
INTEGERB(4，4)，P
N＝4
CALLSUB(B，N)
WRITE(*，*)P(B，N)
END
SUBROUTINESUB(Q，N)
INTEGERM，N，K，Q(N，N)
D010K＝1，N
D010M＝1，N
10Q(M，K)＝8*(K-1)+M
END
INTEGER FUNCTI()N P(B，N)
INTEGERB(N，N)
P＝0
D0100K＝1，N
100P＝P+B(K，K)
END
运行上述程序后，输出的结果为()。
(A) 55
(B) 56
(C) 57
(D) 58
阅读下列FORTRAN77程序：
PI＝3.14159265
WRITE(*，‘(F7.4)’)PI
END
程序运行后输出结果是()。
(A) 3.142
(B) 3.1415
(C) 0.31416
(D) 3.1416
阅读下列FORTRAN77程序：
F＝1.0
D020K＝3，7，3
20WRTTE(*，(I3，F8.1)K，K*K
END
程序运行结果的最后一行是()。
(A) 36.0
(B) 66.0
(C) 6180.0
(D) 7180.0
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
