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.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

最新試題
有程序: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é)果為:()
一般認(rèn)為,世界上第一臺電子數(shù)字計算機(jī)誕生于()
有程序: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é)果是:()
有程序: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時,此程序執(zhí)行后的輸出結(jié)果為:()
有程序:CHARACTER*4A,B*6A=‘ABCD’B=A∥‘EFGH’WRITE(*,*)BEND此程序執(zhí)行后的輸出結(jié)果為:()
有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND執(zhí)行此程序后,輸出結(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é)果是:()
有程序:INTEGERFF(X,Y)=X/Y+XA=-2.0B=4.0B=B+F(A,B)WRITE(*,20)B20FORMAT(1X,F(xiàn)4.1)END此程序的運(yùn)行結(jié)果是:()
有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO10J=1,N10A(I)=A(J)+1WRITE(*,*)A(N)END此程序的運(yùn)行結(jié)果為:()