首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
工程
(2008年) 阅读下列FORTRAN程序: DIMENSION M(6) READ (*,*)M DO 10 J=1,6 D0 10 K=J,6 IF(M(K).LTM(J)THEN N=M(K
(2008年) 阅读下列FORTRAN程序: DIMENSION M(6) READ (*,*)M DO 10 J=1,6 D0 10 K=J,6 IF(M(K).LTM(J)THEN N=M(K
admin
2014-08-29
34
问题
(2008年) 阅读下列FORTRAN程序:
DIMENSION M(6)
READ (*,*)M
DO 10 J=1,6
D0 10 K=J,6
IF(M(K).LTM(J)THEN
N=M(K)
M(K)=M(J)
END IF
10 CONTINUE
WRITE(*,100)(M(I),I=1,6)
100 FORMAT(2X,614)
END
键盘输入10、7、9、2、1、3;程序运行后的输出结果是( )。
选项
A、1 2 3 7 9 10
B、10 9 7 3 2 1
C、7 9 2 1 3 10
D、3 1 2 9 7 10
答案
A
解析
数组赋值以后,各数组元素的值为:
M(1)=10 M(2)=7 M(3)=9
M(4)=2 M(5)=1 M(6)=3
当循环一次后M(1)的值就确定下来了,因此不需要再做下去。
转载请注明原文地址:https://kaotiyun.com/show/At8f777K
本试题收录于:
暖通空调基础考试(上午)题库注册公用设备工程师分类
0
暖通空调基础考试(上午)
注册公用设备工程师
相关试题推荐
变截面杆AC受力如图所示。己知材料弹性模量为E,杆BC段的截面积为A,杆AB段的截面积为2A,则杆C截面的轴向位移是()。
均质细杆OA,质量为m,长l。在如图示水平位置静止释放,释放瞬时轴承O施加于杆OA的附加动反力为()。
由曲线y=lnx,y轴与直线y=lna,y=lnb(b>a>0)所围成的平面图形的面积等于()。
某热水锅炉房,系统内部的压力损失为15mH2O,锅炉房至最不利用户的供回水管的压力损失为20mH2O,最不利用户内部系统的压力损失为10mH2O,取安全系数为1.15。则该热水锅炉房所需循环水泵的扬程为()。
设某管段的同时出流概率为45%,管段的给水当量为4.0,则该管段的设计秒流量为()。
已知一台3缸制冷压缩机气缸直径D=50mm,活塞行程S=35mm,主轴转速n=2800rpm,当蒸发温度为-15℃,冷凝温度为30℃时,测其制冷量为9kW,已知如下图h1=365kJ/kg,h2=388kJ/kg,h3=224kJ/kg,V1=0.105m
下图所示为背压式汽轮机热力循环的温-熵(T-S)图,其中说法是错误的是()。
单相半波整流电路如图所示,已知变压器副边电压为u(t)=28.28sin(ωt+ψ)V,设D为理想二极管,直流电压表的读数最接近于()。
Internet提供的服务方式分为基本服务方式和扩展服务方式,下列选项中属于基本服务方式的是()。
总线能为多个部件服务,它可分时地发送与接受各部件的信息,所以可以把总线看成是()。
随机试题
保健按摩师在提供心理服务时扮演的角色是()。
Iturnedaroundandsaweverybody______atamanwho______loudlyinaforeignlanguage.
乳癌局部检查中,下列哪项体征提示预后最差()(1999年)
患者因行剖宫产需进行术前准备。护士准备给其插入导尿管,但患者不同意,此时护士应
某公路工程项目可行性研究报告的相关资料和基础数据如下:(1)项目工程费用为2000万元,工程建设其他费用为500万元(其中无形资产费用为200万元),基本预备费费率为8%,预计未来3年的年均投资价格上涨率为5%。(2)项目建设前期年限为1年,建设期为2
著名社会学家费孝通先生所________的乡土中国,正在发生改变。在我们的传统社会里,人际关系织成了一张张庞大而复杂的网,或因血缘,或因地缘,或因姻亲……,各种“缘”让彼此熟悉、彼此关照,乡土中国是一张通过“熟人”________的网络。填入画横线部分最恰
X先生一直被誉为19世纪西方世界的文学大师,但是,他从前辈文学巨匠得到的受益却被评论家们忽略了。此外,X先生从未写出真正的不朽巨著,他最广为人知的作品无论在风格上还是表达上均有较大的缺陷。从上述陈述可以得出以下哪项结论?
试述辽朝政治制度的特点。
证明n阶矩阵相似。
Youwillhearamanagerinatravelcompanyaddressingagroupofemployeesonhowtowriteatourismmarketingplan.Asyou
最新回复
(
0
)