题库大全
查看
题库大全
题库
考试培训
财会类题库
网络知识
作业答案
作业习题
蚂蚁庄园答案
当前位置:
题库大全
作业答案
有程序:I=5J=10K=20M=-10IF(I.GT.M)M=IIF(J.GT.M)M=JIF(K.GT.M)M=KWRITE(*,*)MEND此程
有程序:I=5J=10K=20M=-10IF(I.GT.M)M=IIF(J.GT.M)M=JIF(K.GT.M)M=KWRITE(*,*)MEND此程
发布时间:2021-02-15 04:54:29
1.[]有程序:I=5 J=10 K=20 M=-10 IF(I.GT.M)M=I IF(J.GT.M)M=J IF(K.GT.M)M=K WRITE(*,*)M END 此程序的运行结果是:A.5 B.10 C.20 D.-10ABCD
网友回答
参考答案:C
参考解析:在3个IF语句中,逻辑表达式的值都为真,因此它们后面的语句都分别执行到了,M应取最后一次赋值的结果。
以上问题属网友观点,不代表本站立场,仅供参考!
上一条:
有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMA
下一条:
有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF
资讯推荐
下列语句中哪条是错误的?A.WRITE(*,*)(I,A(I),I=1,N)B.WRITE(*,*)(N,A(I),I=1,N)C.READ(*,*)
下面正确的逻辑IF语句是哪一条?A.IF(NX.BQ.NY)THENGOTO10B.IFA.LT.BPRANT*C.IF(ABS(x).LE.1E-5
下面符合语法规定的语句是哪一条?A.IF(x.LT.0.0.GT.5.0)x=.TRUE.B.IF(.NOT.(x.LT.1.0))Y=.FALSEC
以下说法中哪一条不正确?A.循环嵌套的各层循环变量不能同名B.在循环体内不能再给循环变量赋值C.循环嵌套中可以从内循环转向外循环D.各种循环可以互相嵌
以下数组说明中正确的一项是?A.N=SDIMENSIONA(3,4),I(2,2),C(N)B.REALA(3,4),I(2,2),C(2*2)C.D
下列对函数子程序中形参的叙述,正确的是?A.可以是变量名、数组名、符号常量B.可以是变量名、数组名、子程序名C.只能是变量名或数组名D.只能是变量名A
下面关于函数子程序的描述中,正确的一顶是?A.函数值只能通过函数名返回B.当实参为变量时,形参的改变影响实参的值C.一个函数子程序只能返回一个函数值或
对OPEN(4,FILE=‘BB.DAT',STATUS=‘OLD',语句,下面哪个描述是正确的?A.打开一个有格式顺序文件,可以读文件B.打开一个有
下列几种关于存取文件的描述哪个是正确的?A.有格式文件只能按顺序文件的形式存取B.有格式文件的存取适用于顺序文件也适用于直接文件C.无格式文件只适用于
在FORTRAN语言中,文件存取单位是:A.文件B.变量C.记录D.字节ABCD
以下存在语法错误的OPEN语句是哪一条?A.OPEN(8)B.OPEN(8,FORM=‘UNFORMATTED')C.OPEN(8,ACCESS=‘D
对任意输入的x,READ(*,*)xK=SIN(x)WRITE(*,*)KEND此程序执行后K的值为:A.在区间[-1,1]中的一个值B.一定等于0C
有程序:K=0DO10I=1,2DO10J=1,210K=K+I/JWRITE(*,*)KEND此程序的执行结果K值为:A.0B.2C.2.5D.1A
有程序:K=1DO10I=1,2DO10J=1,210K=K*I/JWRITE(*,*)KEND此程序执行后的输出结果为:A.1B.0C.0.5D.2
有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J)K=I*J10CONTINUEWRITE(*,*)KEND此程序执行
有程序:DIMENSIONA(2,2)READ(*,*)ASUM=0DO10I=1,2D010J=1,210A(I,J)=A(I,J)+I+JWRIT
有程序:READ(*,*)xY=0.0IF=(xGT.0.0)THENY=1.0ELSEIF(x.GE.150)THENY=2.0ELSEY=3.0E
有程序:F1(x)=2.0/(1.0+x)F2(Y)=F1(Y)*Y+1.0A=F1(1.0+F2(1.0)WRITE(*,10)A10FORMAT(
有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序执行后的输出结果的记录
下列程序执行时,需输入数据的记录个数必须为:DIMENSIONA(4,4)READ(*,*)A………………ENDA.1个B.4个C.16个D.不超过1
有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3
有程序:CHARACTER*6SS=‘ABCDEF'CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,
有程序:CHARACTER*4A,B*6A=‘ABCD'B=A∥‘EFGH'WRITE(*,*)BEND此程序执行后的输出结果为:A.ABCDEFGH
有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND执行此程序
有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M
有程序:DIMENSIONA(4,3)DATAA/3*-1.0,3*-2.0,3*-3.0,3*-4.0/S=0.0DO10K=1,4D=ABS(A(
有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,FILE=‘INPUT.DAT',STATUS=‘OLD')REA
有程序:ADD(X,Y)=X**2+YOPEN(8,FILE=‘F',STATUS=‘NEW',ACCESS=‘DIRECT',*FORM=‘UNFO
有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB',‘CDE',‘FGHI'/WRITE(*,100)X,Y,Z100FORM
返回顶部