问题
单项选择题
阅读以下FORTRAN程序：
READ(*.*)M IF(M.LF.100.AND.M.GT.999) STOP K=M/100 L=(M-K*100)/10 N=M-K*100-L*10 MM=K+N WRITE(*,'(2x,13)') MM END
键盘输入600，则程序的输出结果是（）。
A．8
B．3
C．7
D．6
答案
参考答案：D
搜题请搜索小程序“爱下问搜题”
阅读以下FORTRAN程序：
READ(*.*)M IF(M.LF.100.AND.M.GT.999) STOP K=M/100 L=(M-K*100)/10 N=M-K*100-L*10 MM=K+N WRITE(*,'(2x,13)') MM END
键盘输入600，则程序的输出结果是（）。
A．8
B．3
C．7
D．6
参考答案：D