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

有程序：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í)行此程序的結果是：（）

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

有程序：DATAI，M，N／2，1，4／10M=M*II=I+1IF（I．GT．N）GOT020GOTO1020WRITE（*，*）MEND執(zhí)行此程序后，輸出結果為：（）

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

有程序：I=5J=10K=20M=-10IF（I．GT．M）M=IIF（J．GT．M）M=JIF（K．GT．M）M=KWRITE（*，*）MEND此程序的運行結果是：（）

有程序：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此程序運行的結果為：（）

有程序：DIMENSION（4，4）READ（*，*）AWRITE（*，10）A10FORMAT（1x，6E9．2）END此程序執(zhí)行后的輸出結果的記錄數(shù)為：（）

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

有程序：READ（*，50）SWRITE（*，100）S50FORMAT（1X，F(xiàn)7．3）100FORMAT（1X，F(xiàn)8．3）END執(zhí)行此程序，由鍵盤輸入123456789，則輸出S的值為：（）