首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
工程
(2008年)阅读下列FORTRAN程序: DIMENSION M(4,3) DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/ N=M(1,1) DO 10 I=1,4
(2008年)阅读下列FORTRAN程序: DIMENSION M(4,3) DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/ N=M(1,1) DO 10 I=1,4
admin
2014-08-10
117
问题
(2008年)阅读下列FORTRAN程序:
DIMENSION M(4,3)
DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/
N=M(1,1)
DO 10 I=1,4
DO 10 J=1,3
IF (M(I,J).LT.N)THEN
N=M(I,J)
K1=I
K2=J
ENFIF
10 CONTINUE
WRITE(*,‘(2x,314)’)N,K1,K2
END
程序运行后的输出结果是( )。
选项
A、93,3,1
B、-10,1,1
C、-45,4,3
D、78,3,2
答案
C
解析
数组元素的值分别为: M(1,1)=-10,M(2,1)=-12,M(3,1)=-24,M(4,1)=11,
M(1,2)=-20,M(2,2)=-15,M(3,2)=61,M(4,2)=78,
M(1,3)=93,M(2,3)=30,M(3,3)=44,M(4,3)=-45,
最后一次循环:N=M(4,3)=-45,K1=4,K2=3
转载请注明原文地址:https://kaotiyun.com/show/3ewf777K
本试题收录于:
供配电(公共基础)题库注册电气工程师分类
0
供配电(公共基础)
注册电气工程师
相关试题推荐
建设项目中防治污染的设施,必须与主体工程同时()。
项目经理是()代表在项目上全权委托的代理人。
某企业在采用需要系数法计算负荷时,在未计入同时系数前的总有功功率为1264kW,总无功功率为763kvar。在采用无功补偿电容器时,要求补偿后的功率因数约为0.92,则电容器补偿容量的计算值约为()。
生产、销售用能产品和使用用能设备的单位和个人,必须在国务院管理节能工作的部门会同国务院有关部门规定的期限内,停止生产、销售国家明令淘汰的用能产品,停止使用国家明令淘汰的用能设备,并不得将淘汰的设备转让给他人使用。违反本规定,生产、销售国家明令淘汰的用能产品
用电单位的供电电压应根据()、用电设备特性、供电距离、供电线路的回路数、当地公共电网现状及发展规划等因素,经过技术经济性比较来确定。
选用合理的照明方案有()。
某企业总变电所电压等级为110/10kV,分别向四个车间变电所提供10kV电源,这四个车间变电所的计算负荷如下:1#车间变电所P1=2440kw,Q1=3245kvar,S1=4060kV.A,cosψ1=0.6;2#车间变电所P2=182
某一具有多功能的综合性建筑地处繁华闹市,五层裙楼分东西两部分,东部是一独立的银行办公区域,金库设在地下一层,一层有大堂、保险箱房、总出纳室、营业柜台以及无人值守的24h存、取款自助银行等。西部一层有酒店的大堂、商务中心、游泳馆、酒吧等,2~5层为餐饮、娱乐
大中型PLC多采用台式计算机或笔记本,配以专用的程序开发软件,信息量大,功能齐全,可实现()功能。
以下不是可编程序控制器基本组成部分的部件是()。
随机试题
在Windows中,用鼠标左键将一个文件夹拖动到同一个磁盘的另一个文件夹时,系统执行是_______。
(77)Whatdowemeanbyasatisfactorystandardofliving?Obviously,itmustincludethebasicnecessitiesoflifesuchasfood
杏苏散中含有
苏子降气汤组成中不包含的药物是
在我国实施人类辅助生殖技术,下列各项中违背卫生部制定的伦理原则的是
一般而言。财富积累达到最高峰的时候是()。
青铜艺术大致可以分为几个时期?各时期有何艺术特色以及重要的代表作?
按照()的原则和“革命化、年轻化、知识化、专业化”的方针,加强领导班子建设,把各级领导班子建设成为政治坚定、开拓创新、团结协作、廉政勤政的领导班子。
TheChinaboomisbynowawell-documentedphenomenon.Whohasn’t【1】theMiddleKingdom’sastoundingeconomicgrowth(8percenta
在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()DimxAsInteger,nAsIn
最新回复
(
0
)