單項選擇題為使字符變量STR1的值為’NEW’,STR2的值為’WANG’,STR3的值為‘You’,以下輸入數(shù)據(jù)的正確方式是:CHARACTERSTR1*5,STR2*4,STR3*3READ(*,10)STR1,STR2,STR310FORMAT(A3,A4,A5)()

A.NEWWANGYou
B.NEWWANGYou
C.NEWWANGYou
D.NEW,WANG,You


你可能感興趣的試題

1.單項選擇題M不能被N整除的FORTRAN表達式為:()

A.(M/N).NE.0
B.NOT.(MOD(M,N).NE.0)
C.MOD(M,N).NE.0
D.INT(M/N).NE.0

2.單項選擇題以下的關系表達式中,哪個是正確的()?

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

3.單項選擇題已知:A=15.0,B=16.0,C=17.0,L=.FALSE.,則其值為.FALSE.的表達式是()

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

4.單項選擇題下面敘述中正確的是?()

A.在FORTRAN程序中,各類語句的位置是任意的
B.在FORTRAN程序中的任何一個語句在程序執(zhí)行時,機器都會產生操作
C.在FORTRAN程序中的每一行上,都有標號
D.在FORTRAN程序中,所有可執(zhí)行語句在程序執(zhí)行時,機器都會產生操作

5.單項選擇題在FORTRAN語言中,一個程序行中的80個字符位按從左到右順序分成4個區(qū),其排列的次序為:()

A.續(xù)行區(qū)、語句區(qū)、注釋區(qū)、標號區(qū)
B.標號區(qū)、語句區(qū)、注釋區(qū)、續(xù)行區(qū)
C.標號區(qū)、續(xù)行區(qū)、語句區(qū)、注釋區(qū)
D.續(xù)行區(qū)、標號區(qū)、語句區(qū)、注釋區(qū)

最新試題

有程序:F(X,Y)=X/Y+XY=-2.0X=4.0X=1.0*F(Y,X)WRITE(*,*)XEND此程序的運行結果是:()

題型:單項選擇題

有程序: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上面程序的運行結果為:()

題型:單項選擇題

有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當執(zhí)行此程序時,從鍵盤輸入1234567890↙,則程序的運行結果是:()

題型:單項選擇題

有程序: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此程序運行的結果為:()

題型:單項選擇題

有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO10J=1,N10A(I)=A(J)+1WRITE(*,*)A(N)END此程序的運行結果為:()

題型:單項選擇題

有程序:INTEGERB(3,3)DATAB/3*2,3*3,3*4/DO10I=1,310WRITE(*,‘(1X,3I2)’)(B(I,J),J=1,3)END此程序的運行結果是:()

題型:單項選擇題

有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運行結果是:()

題型:單項選擇題

有程序:CHARACTER*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結果為:()

題型:單項選擇題

有程序:F1(x)=2.0/(1.0+x)F2(Y)=F1(Y)*Y+1.0A=F1(1.0+F2(1.0)WRITE(*,10)A10FORMAT(1x,E8.2)END此程序執(zhí)行后的輸出結果為:()

題型:單項選擇題

有程序: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í)行此程序的結果是:()

題型:單項選擇題