A.IF(NX.BQ.NY)THENGOTO10
B.IFA.LT.BPRANT*
C.IF(ABS(x).LE.1E-5)x=5
D.IF(S.AND.(S.LE.2.0))S=2*3
您可能感興趣的試卷
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)考前沖刺(一)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)考前沖刺(二)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)考前沖刺(二)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)考前沖刺(三)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)模擬試題(三)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)模擬試題(四)
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師基礎(chǔ)知識(shí)模擬試題(四)
你可能感興趣的試題
A.WRITE(*,*)(I,A(I),I=1,N)
B.WRITE(*,*)(N,A(I),I=1,N)
C.READ(*,*)N,(A(I),I=1,N)
D.READ(*,*)(N,A(I),I=1,N)
A.Fw.d
B.Iw.d
C.A
D.Gw.d
A.NEWWANGYou
B.NEWWANGYou
C.NEWWANGYou
D.NEW,WANG,You
A.(M/N).NE.0
B.NOT.(MOD(M,N).NE.0)
C.MOD(M,N).NE.0
D.INT(M/N).NE.0
A.(3.2x-1.0).GT.Y
B.(x+Y+Z)*SQRT(ABS(x))EQ0.0
C.LOG(ABS(x)).LT.0.0
D.(A+B.*x>B-C
最新試題
有程序: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(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序執(zhí)行后的結(jié)果為:()
有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMAT(I2,I1)END執(zhí)行上面的程序時(shí),從鍵盤輸入365,2,則運(yùn)行后結(jié)果I的值是:()
有程序:DIMENSIONA(4,3)DATAA/3*-1.0,3*-2.0,3*-3.0,3*-4.0/S=0.0DO10K=1,4D=ABS(A(K,1))DO20J=2,3IF(ABS(A(K,J)).GT.D)D=ABS(A(K,J))20CONTINUES=S+D10CONTINUEWRITE(*,*)SEND此程序執(zhí)行后的結(jié)果為:()
有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3)WRITE(*,*)x(2)END當(dāng)輸入1、2、3、4、5、6、7、8、9時(shí),此程序執(zhí)行后的輸出結(jié)果為:()
有程序:WRITE(*,400)876.345400FORMAT(1X,E8.0)此程序段的正確執(zhí)行結(jié)果是:()
有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序運(yùn)行的結(jié)果為:()
有程序:M=2N=MD010I=1,N+1,NN=N*NM=M*N10CONTINUEWRITE(*,*)MEND此程序的運(yùn)行結(jié)果是:()
有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,F(xiàn)ILE=‘INPUT.DAT’,STATUS=‘OLD’)READ(15,10)STR1,STR2,STR310FORMAT(A6,1x,A5,1x,A4)WRITE(*,’(1x,3A)’)STR1,STR2,STR3CLOSE(15)END用此程序從文件INPUT.DAT中讀出字符串’FORMATANEWDISK’,程序運(yùn)行結(jié)果是:()
有程序:I=5J=10K=20M=-10IF(I.GT.M)M=IIF(J.GT.M)M=JIF(K.GT.M)M=KWRITE(*,*)MEND此程序的運(yùn)行結(jié)果是:()
有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運(yùn)行結(jié)果是:()