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’)
A.文件
B.變量
C.記錄
D.字節(jié)
A.有格式文件只能按順序文件的形式存取
B.有格式文件的存取適用于順序文件也適用于直接文件
C.無格式文件只適用于直接文件存取
D.無格式文件只適用于順序文件存取
A.打開一個有格式順序文件,可以讀文件
B.打開一個有格式直接文件,可以寫文件
C.打開一個有格式直接文件,可以讀寫
D.打開一個直接文件
A.函數(shù)值只能通過函數(shù)名返回
B.當(dāng)實(shí)參為變量時,形參的改變影響實(shí)參的值
C.一個函數(shù)子程序只能返回一個函數(shù)值或一個變量值
D.函數(shù)值只能通過形實(shí)結(jié)合雙向傳遞
A.可以是變量名、數(shù)組名、符號常量
B.可以是變量名、數(shù)組名、子程序名
C.只能是變量名或數(shù)組名
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)體內(nèi)不能再給循環(huán)變量賦值
C.循環(huán)嵌套中可以從內(nèi)循環(huán)轉(zhuǎn)向外循環(huán)
D.各種循環(huán)可以互相嵌套
最新試題
有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND執(zhí)行兩次以上程序,若運(yùn)行中的輸入值分別為2.5和-1.0,則兩次運(yùn)行結(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é)果是:()
有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運(yùn)行結(jié)果是:()
有程序: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此程序運(yùn)行的結(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é)果是:()
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運(yùn)行結(jié)果是:()
有程序:LOGICALA,B,C,DINTEGERX,YDATAX,Y,A,B/1,-1,2*.FALSE./C=.NOT.A.AND(B.OR.XGE.Y)D=.NOT.(A.AND.B.OR、X.GE.Y)WRITE(*,*)C,DEND上面程序的運(yùn)行結(jié)果是:()
有程序: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í)行此程序,則運(yùn)行的結(jié)果是:()
有程序:CHARACTER*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結(jié)果為:()
有程序: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上面程序的運(yùn)行結(jié)果為:()