A.18
B.30
C.25
D.36
您可能感興趣的試卷
你可能感興趣的試題
A.1
B.0
C.0.5
D.2
A.0
B.2
C.2.5
D.1
A.在區(qū)間[-1,1]中的一個值
B.一定等于0
C.在區(qū)間(-1,1)中的一個值
D.K=0或K=-1
A.順序有格式讀,順序無格式寫
B.直接有格式讀,順序有格式寫
C.直接無格式讀,直接無格式寫
D.直接無格式讀,順序有格式寫
A.OPEN(8)
B.OPEN(8,F(xiàn)ORM=‘UNFORMATTED’)
C.OPEN(8,ACCESS=‘DIRECT’)
D.OPEN(8,F(xiàn)ILE=‘AA’)
最新試題
有程序:INTEGERPP=0DO10I=0,10,3DO10J=5,100,20DO10K=-10,-5,-110P=P+1WRITE(*,*)PEND此程序的運行結果是:()
有程序:ADD(X,Y)=X**2+YOPEN(8,F(xiàn)ILE=‘F’,STATUS=‘NEW’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTED’,REAL=16DO10I=1,4D=ADD(REAL(I),2、0)WRITE(8,REC=I)D10CONTINUECLOSE(8)OPEN(2,F(xiàn)ILE=‘F’,STATUS=‘OLD’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTFED’,REAL=6DO20I=2,4,2READ(2,REC=I)CWRITE(*,30)C20CONTINUE20FORMAT(1x,F(xiàn)4.1)CLOSE(2)END執(zhí)行此程序的結果是:()
有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序運行的結果為:()
有程序: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í)行此程序,則運行的結果是:()
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運行結果是:()
有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序執(zhí)行后的輸出結果的記錄數(shù)為:()
有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的運行結果是:()
有程序:I=5J=10K=20M=-10IF(I.GT.M)M=IIF(J.GT.M)M=JIF(K.GT.M)M=KWRITE(*,*)MEND此程序的運行結果是:()
有程序:CHARACTER*4A,B*6A=‘ABCD’B=A∥‘EFGH’WRITE(*,*)BEND此程序執(zhí)行后的輸出結果為:()
下列說法中,正確的一條是()