單項選擇題有程序：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í)行后的結(jié)果為：（）

A.15.0
B.12.0
C.9.0
D.10.0


你可能感興趣的試題

1.單項選擇題有程序：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é)果為：（）

A.1；4；7；2；5；8；3；6；9
B.1；2；3；4；5；6；7；8；9
C.9；6；3；8；5；2；7；4；1
D.7；8；9；4；5；6；1；2；3

最新試題

有程序：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í)行后的輸出結(jié)果為：（）

題型：單項選擇題

有程序：CHARACTER*4STR1，STR2，STR3OPEN（UNIT=15，F(xiàn)ILE=‘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’，程序運行結(jié)果是：（）

題型：單項選擇題

有程序：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é)果為：（）

題型：單項選擇題

有程序：N=0DOK=6，2，-2N=N+KM=2*N10CONTINUEWRITE（*，*）MEND上面程序的運行結(jié)果是：（）

題型：單項選擇題

有程序：READ（*，10）IA，IIF（IA．GE．125）THENI=I+10，ELSEI=I-10ENDIFWRITE（*，*）I10FORMAT（I2，I1）END執(zhí)行上面的程序時，從鍵盤輸入365，2，則運行后結(jié)果I的值是：（）

題型：單項選擇題

有程序：CHARATERX*2，Y*3，Z*4DATAX，Y，Z／‘AB’，‘CDE’，‘FGHI’／WRITE（*，100）X，Y，Z100FORMAT（1X，A1，A2，A3）END此程序的運行結(jié)果是：（）

題型：單項選擇題

有程序：F（C，D）=A*C+B／DA=1．0B=2．0WRITE（*，*）F（A，B）+F（B，A）END此程序的運行結(jié)果是：（）

題型：單項選擇題

有程序：INTEGERB（3，3）DATAB／3*2，3*3，3*4／DO10I=1，310WRITE（*，‘（1X，3I2）’）（B（I，J），J=1，3）END此程序的運行結(jié)果是：（）

題型：單項選擇題

有程序：INTEGERFF（X，Y）=X+YA=-2．0B=4．0B=1．0+F（A，B）WRITE（*，‘（1X，F(xiàn)3．1）’）BEND此程序的運行結(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上面程序的運行結(jié)果為：（）

題型：單項選擇題