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）
A.Fw.d
B.Iw.d
C.A
D.Gw.d
最新試題
有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的運行結果是：（）
有程序：DIMENSIONA（4，3）DATAA／3*-1．0，3*-2．0，3*-3．0，3*-4．0／S=0．0DO10K=1，4D=ABS（A（K，1））DO20J=2，3IF（ABS（A（K，J））．GT．D）D=ABS（A（K，J））20CONTINUES=S+D10CONTINUEWRITE（*，*）SEND此程序執(zhí)行后的結果為：（）
有程序：WRITE（*，400）876．345400FORMAT（1X，E8．0）此程序段的正確執(zhí)行結果是：（）
有程序：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此程序運行的結果為：（）
下列說法中，正確的一條是（）
有程序：F（X，Y）=X／Y+XY=-2．0X=4．0X=1．0*F（Y，X）WRITE（*，*）XEND此程序的運行結果是：（）
有程序：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í)行后的結果為：（）
有程序：DIMENSION（4，4）READ（*，*）AWRITE（*，10）A10FORMAT（1x，6E9．2）END此程序執(zhí)行后的輸出結果的記錄數(shù)為：（）
有程序：CHARACTER*6SS=‘ABCDEF’CALLSS（S）ENDSUBROUTINESS（S1）CHARACTERS1*3WRITE（*，*）S1END此程序執(zhí)行后的輸出結果為：（）
有程序：READ（*，10）IA，IIF（IA．GE．125）THENI=I+10，ELSEI=I-10ENDIFWRITE（*，*）I10FORMAT（I2，I1）END執(zhí)行上面的程序時，從鍵盤輸入365，2，則運行后結果I的值是：（）