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

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

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

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

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

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

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

有程序：INTEGERFF（X，Y）=X／Y+XA=-2．0B=4．0B=B+F（A，B）WRITE（*，20）B20FORMAT（1X，F(xiàn)4．1）END此程序的運(yùn)行結(jié)果是：（）