问题
单项选择题
阅读以下FORTRAN程序:READ(”,”)MIF(M.LT.100.ND.M.GT.999)STOPK=M/100L=(M-K*100)/10N=M-K*100-L*10MM=K+NWRITE(*,’(2X,I3)')MMEND键盘输入600,则程序的输出结果是()。
A.8
B.3
C.7
D.6
答案
参考答案:D
阅读以下FORTRAN程序:READ(”,”)MIF(M.LT.100.ND.M.GT.999)STOPK=M/100L=(M-K*100)/10N=M-K*100-L*10MM=K+NWRITE(*,’(2X,I3)')MMEND键盘输入600,则程序的输出结果是()。
A.8
B.3
C.7
D.6
参考答案:D