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

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

有程序：F（X，Y）=X／Y+XY=-2．0X=4．0X=1．0*F（Y，X）WRITE（*，*）XEND此程序的運(yùn)行結(jié)果是：（）

有程序：N=0DOK=6，2，-2N=N+KM=2*N10CONTINUEWRITE（*，*）MEND上面程序的運(yùn)行結(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’，程序運(yùn)行結(jié)果是：（）

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

有程序：READ（*，100）A100FORMAT（3x，F(xiàn)6．2）WRITE（*，200）A200FORMAT（1x，F(xiàn)8．2）END當(dāng)執(zhí)行此程序時(shí)，從鍵盤輸入1234567890↙，則程序的運(yùn)行結(jié)果是：（）

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

有程序：LOGICALA，B，C，DINTEGERX，YDATAX，Y，A，B／1，-1，2*．FALSE．／C=．NOT．A．AND（B．OR．XGE．Y）D=．NOT．（A．AND．B．OR、X．GE．Y）WRITE（*，*）C，DEND上面程序的運(yùn)行結(jié)果是：（）