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)
您可能感興趣的試卷
- 一級(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.Fw.d
B.Iw.d
C.A
D.Gw.d
A.NEWWANG
You
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
A.A*C.GT.B.AND..NOT.L
B.NOT.(B.LT.C+A.OR.(L.NEQV.A.GE.C.
C.B*A.GE.B+A.OR.(L.AND..TROE.)
D.L.EQV.A+C.LE.B
最新試題
有程序:INTEGERM(3,4)DATAM/4*-1,4*-2,4*-3/S=0DO10I=1.310S=S+M(I,I+1)DO20I=4,2,-120S=S-M(I-1,I)WRITE(*,*)SEND上面程序的運(yùn)行結(jié)果為:()
第一代計(jì)算機(jī),體積大,耗電多,性能低,其主要原因是制約于()
有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F(xiàn)7.3)100FORMAT(1X,F(xiàn)8.3)END執(zhí)行此程序,由鍵盤輸入123456789,則輸出S的值為:()
有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當(dāng)執(zhí)行此程序時(shí),從鍵盤輸入1234567890↙,則程序的運(yùn)行結(jié)果是:()
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運(yùn)行結(jié)果是:()
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運(yùn)行結(jié)果是:()
有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的運(yùn)行結(jié)果是:()
有程序:DATAA,B,C/4.0,-8.0,3.0/P=B*B-4*A*CIF(P.GE.0.0)THENS=(-B+SQRT(P))/(2*A)T=C/(A*S)P=(S+T)/2ELSES=0T=0ENDIFWRITE(*,*)PEND執(zhí)行此程序,則運(yùn)行的結(jié)果是:()
有程序: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é)果為:()
有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND執(zhí)行此程序后,輸出結(jié)果為:()