网友您好，请在下方输入框内输入要搜索的题目：

搜题

题目内容（请给出正确答案）

提问人：网友phoen_ix 发布时间：2022-01-06

[主观题]

阅读下列FORTRAN程序： S=1.0 DO100K=3，1，-1 DO100N=-1，-3100S=2S WRITE（，*) S END运行上述程序

阅读下列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程序： S=1.0 DO100K=3，1，-1 DO100N=-1，-3100S=2*S WRITE（*，*) S END运行上述程序”相关的问题

第1题

阅读下列FORTRAN程序：S＝1.0D010K＝2，4，210S＝S+1.0/KWRITE（*，*)SEND执行上述程序后，输出的S值为（)。

阅读下列FORTRAN程序：

S＝1.0

D010K＝2，4，2

10S＝S+1.0/K

WRITE(*，*)S

END

执行上述程序后，输出的S值为()。

(A)0.75

(B)1.75

(D)1.0

点击查看答案

第2题

阅读下列FORTRAN程序：DO20K=2，5，2S=1.0DO10J=K，510S=S+J20CONTINUE*WRITE（*，*) SEND执行上述程序

阅读下列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

点击查看答案

第3题

阅读下列FORTRAN程序：DIMENSIONA（3，4)DATAA/3*+4.0，3*-3.0，3*-2.0，3*-1.0/S=0.0DO20K=1，3D=A（K，1

阅读下列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

点击查看答案

第4题

阅读下列FORTRAN程序：X=1.0Y=2.0CALL SUB（X，Y，Z，3.0)WRITE（*，100) X，Y，Z100FORMAT（1X，13.1)ENDSU

阅读下列FORTRAN程序： X=1.0 Y=2.0 CALL SUB(X，Y，Z，3.0) WRITE(*，100) X，Y，Z 100 FORMAT(1X，13.1) END SUBROUTINE SUB(A，B，X，Z) A=A+1 B=B+2 Y=1.0 X=Y+Z END 执行上述程序后，输出的结果为()。

A．2.0 5.0 4.0

B．4.0 1.0 2.0

C．4.0 2.0 4.0

D．2.0 4.0 4.0

点击查看答案

第5题

阅读下列FORTRAN程序：DIMENSIONA（3)DATAA/3.0，2.0，1.0/X＝F（A) WRITE（*，100)X100FORMAT（1X，F3.1)E

阅读下列FORTRAN程序：

DIMENSIONA(3)

DATAA/3.0，2.0，1.0/

X＝F(A)

WRITE(*，100)X

100FORMAT(1X，F3.1)

END

FUNCTIONF(B)

DIMENSIONA(3)，B(3)

DO10I＝1，3

10A(1)＝B(1)-I

F＝A(1)+A(2)+A(3)

X＝1.0-F

END

执行上述程序后，输出的X值为()。

(A) 1.0

(B) 0.0

(D) -5.0

点击查看答案

第6题

阅读下列FORTRAN程序：LOGICAL P，QREAD（*，100)P，Q100FORMAT（2L4)F（P) THENY=1.0ELSE IF（Q) THENY=

阅读下列FORTRAN程序： LOGICAL P，Q READ(*，100)P，Q 100 FORMAT(2L4) F(P) THEN Y=1.0 ELSE IF(Q) THEN Y=2.0 ELSE IF(.NOT.P.OR.Q)THEN Y=3.0 ELSE Y=0.0 VENDIF WRITE(*，*) Y END 在执行上述程序时，由键盘输入FABDTXYZ，最后输出的Y值为()。

A．0.0

B．1.0

C．2.0

D．3.0

点击查看答案

第7题

阅读下列FORTRAN程序：CHARACTER A*5A='ABCDE'CALLS（A)ENDSUBROUTINES（X)CHARACTER X*3WRITE（*，*)

阅读下列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

点击查看答案

第8题

阅读下列FORTRAN程序：S（X)=2*X*X-Y+1.0DATAA，B，Y/3*2.0/P=S（A)*S（B-A)4-S（Y)-S（B)WRITE（*，*) PEN

阅读下列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

点击查看答案

第9题

阅读下列FORTRAN程序： INTEGER X（7) DATA X／4，5，7，8，l0，12，11／ D0 10 K=1。7 IF（MOD（X（K)，2)．N

阅读下列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

点击查看答案

第10题

阅读下列FORTRAN程序：INTEGERS（2，4) ，A（2)DATAS/4*1，4*2/CALLSUB（S，2，4，A)M=A（1) -A（2)WRITE（*，*

阅读下列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

点击查看答案

账号：尚未登录

登录没有账号？去注册

搜题记录

联系客服

购买搜题卡

考试指南全部 >

2024年山东成人高考考什么成人高考如何选择适合的专业及成人高考的学制是几年 24上半年广西自考本科成绩查询入口官网指南 2024年本科自考报考流程最新操作步骤是怎样的 2024年广东成人高考考试科目安徽成人高考报名时间2024及2024年成人高考高起点《语文》考试教材 24上半年河南自学考试成绩查询时间及方式 25岁学历初中还可以考大专吗有哪些途径 2024年河北成考考试科目成人高考学习形式及成人本科可以考银行吗

购买搜题卡查看答案

购买前请仔细阅读《购买须知》

请选择支付方式

微信支付

支付宝支付

点击支付即表示你同意并接受《服务协议》和《购买须知》

立即支付已付款，但不能查看答案，请点这里登录即可>>

搜题卡使用说明

1. 搜题次数扣减规则：

功能	扣减规则
功能	基础费（查看答案）	加收费（AI功能）
文字搜题、查看答案	1/每题	0/每次
语音搜题、查看答案	1/每题	2/每次
单题拍照识别、查看答案	1/每题	2/每次
整页拍照识别、查看答案	1/每题	5/每次