A.可以是變量名、數組名、符號常量
B.可以是變量名、數組名、子程序名
C.只能是變量名或數組名
D.只能是變量名
您可能感興趣的試卷
你可能感興趣的試題
A.N=SDIMENSIONA(3,4),I(2,2),C(N)
B.REALA(3,4),I(2,2),C(2*2)
C.DIMENSIONA(3,4),I(2,2),C(3)REALA(3,4),I(2,2),C(3)
D.READ(*,*)MINTEGERIA(0:M)
A.循環(huán)嵌套的各層循環(huán)變量不能同名
B.在循環(huán)體內不能再給循環(huán)變量賦值
C.循環(huán)嵌套中可以從內循環(huán)轉向外循環(huán)
D.各種循環(huán)可以互相嵌套
A.IF(x、LT、O、O.GT.5.0)x=TRUE
B.IF(.NOT.(x.LT.1.0))y=FALSE
C.IF(xEQV.Y)A=T
D.IF(x.LT.1.0)THENY=.FALSE
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)
最新試題
有程序:WRITE(*,400)876.345400FORMAT(1X,E8.0)此程序段的正確執(zhí)行結果是:()
有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMAT(I2,I1)END執(zhí)行上面的程序時,從鍵盤輸入365,2,則運行后結果I的值是:()
有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運行結果是:()
有程序: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此程序運行的結果為:()
有程序:INTEGERPP=0DO10I=0,10,3DO10J=5,100,20DO10K=-10,-5,-110P=P+1WRITE(*,*)PEND此程序的運行結果是:()
有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO10J=1,N10A(I)=A(J)+1WRITE(*,*)A(N)END此程序的運行結果為:()
有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END當執(zhí)行此程序時,從鍵盤輸入1234567890↙,則程序的運行結果是:()
有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3)WRITE(*,*)x(2)END當輸入1、2、3、4、5、6、7、8、9時,此程序執(zhí)行后的輸出結果為:()
有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,FILE=‘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’,程序運行結果是:()
有程序:F(X,Y)=X/Y+XY=-2.0X=4.0X=1.0*F(Y,X)WRITE(*,*)XEND此程序的運行結果是:()