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
您可能感興趣的試卷
你可能感興趣的試題
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

最新試題
有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND執(zhí)行此程序后,輸出結(jié)果為:()
有程序:READ(*,50)SWRITE(*,100)S50FORMAT(1X,F(xiàn)7.3)100FORMAT(1X,F(xiàn)8.3)END執(zhí)行此程序,由鍵盤輸入123456789,則輸出S的值為:()
第一代計算機,體積大,耗電多,性能低,其主要原因是制約于()
下列程序執(zhí)行時,需輸入數(shù)據(jù)的記錄個數(shù)必須為:DIMENSIONA(4,4)READ(*,*)A………………END()
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運行結(jié)果是:()
有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序執(zhí)行后的輸出結(jié)果的記錄數(shù)為:()
有程序: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é)果為:()
有程序:CHARACTER*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結(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此程序的運行結(jié)果是:()
有程序: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í)行此程序的結(jié)果是:()