阅读以下FORTRAN 程序: READ( *,*) M IF (M. LT. 100. AND. M. GT. 999) STOP K=M/10...

admin2020-12-24  17

问题 阅读以下FORTRAN 程序:
READ( *,*) M
IF (M. LT. 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,I3)')MM
END
键盘输入600,则程序的输出结果是:
A. 8 B. 3 C. 7 D. 6

选项

答案D

解析提示:K=6,L=(600-6*100)=0,N=(600-6 * 100-L* 10) =0,MM=K+N=6+0
转载请注明原文地址:https://ti.zuoweng.com/ti/qtKCKKKQ
相关试题推荐