单选题
阅读下列FORTRAN程序：
READ(*,*) A
IP(A.GE.3.5) THEN
Y=3.0
ELSE
IF(A.GE.4.5) THEN
Y=4.0
ENDIF
ENDIF
WRITE(*,*)Y
END
在执行上述程序时，从键盘输入
READ(*,*) A
IP(A.GE.3.5) THEN
Y=3.0
ELSE
IF(A.GE.4.5) THEN
Y=4.0
ENDIF
ENDIF
WRITE(*,*)Y
END
在执行上述程序时，从键盘输入
【正确答案】
B
【答案解析】[解析] 由于读入的X值为0.7，即不满足条件“X＜0.0”，也不满足条件“X＞0.0”，因此，不执行外层块IF结构中的THEN块与ELSE IF块，执行的是ELSE块，即执行赋值语句“Y=0.5”，最后输出的Y值为0.5。