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

有程序：CHARACTER*6SS=‘ABCDEF’CALLSS（S）ENDSUBROUTINESS（S1）CHARACTERS1*3WRITE（*，*）S1END此程序執(zhí)行后的輸出結(jié)果為：（）

有程序：CHARACTER*4A，B*6A=‘ABCD’B=A∥‘EFGH’WRITE（*，*）BEND此程序執(zhí)行后的輸出結(jié)果為：（）

有程序：DIMENSIONx（3，3）READ（*，*）xCALLSSl（x（1，2））ENDSUBROUTINESSl（x）DIMENSIONx（3）WRITE（*，*）x（2）END當(dāng)輸入1、2、3、4、5、6、7、8、9時(shí)，此程序執(zhí)行后的輸出結(jié)果為：（）

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

有程序：INTEGERA（3）DATAA／3*1／N=2DO10I=1．NDO10J=1，N10A（I）=A（J）+1WRITE（*，*）A（N）END此程序的運(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é)果是：（）

有程序：M=2N=MD010I=1，N+1，NN=N*NM=M*N10CONTINUEWRITE（*，*）MEND此程序的運(yùn)行結(jié)果是：（）

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

有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的運(yùn)行結(jié)果是：（）