（单选题）
有程序：LOGICALLL=．TRUE．READ（*，*）xIF（x．LT．0）THENL=．FALSE．ELSEWRITE（*，*）xENDIFIF（．NOT．L）WRITE（*，*）-xEND执行两次以上程序，若运行中的输入值分别为2．5和-1．0，则两次运行结果分别是：（）
A2.5和1.0
B-2.5和1.0
C2.5和-1.0
D-2.5和-1.0
正确答案
答案解析
当输2．5时，执行ELSE后面的WRITE语句，而第二个IF语句不执行，x的值为2．5；当输入-1．0时，执行第一个IF语句后面的语句L=．FALSE．，而后执行第二个IF语句中的WRITE语句输入-x的值，应为1．0。
相似试题
（简答题）
先张法和后张法的张拉程序有何不同？
（单选题）
有程序：WRITE（*，400）876．345400FORMAT（1X，E8．0）此程序段的正确执行结果是：（）
（单选题）
有程序：N=0DOK=6，2，-2N=N+KM=2*N10CONTINUEWRITE（*，*）MEND上面程序的运行结果是：（）
（单选题）
有程序：CHARACTER*4A，B*6A=‘ABCD’B=A∥‘EFGH’WRITE（*，*）BEND此程序执行后的输出结果为：（）
（单选题）
有程序：DO10I=1，5，3DO10J=I，310K=I+JWRITE（*，*）KEND此程序的运行结果是：（）
（单选题）
有程序：M=2N=MD010I=1，N+1，NN=N*NM=M*N10CONTINUEWRITE（*，*）MEND此程序的运行结果是：（）
（单选题）
有程序：F（X，Y）=X／Y+XY=-2．0X=4．0X=1．0*F（Y，X）WRITE（*，*）XEND此程序的运行结果是：（）
（单选题）
有程序：DIMENSION（4，4）READ（*，*）AWRITE（*，10）A10FORMAT（1x，6E9．2）END此程序执行后的输出结果的记录数为：（）
（单选题）
有程序：K=0DO10I=1，2DO10J=1，210K=K+I／JWRITE（*，*）KEND此程序的执行结果K值为（）
