阅读以下FORTRAN 程序: READ( *,*) M IF (M. LT

书海库2019-12-17  24

问题 阅读以下FORTRAN 程序:READ( *,*) MIF (M. LT. 100. AND. M. GT. 999) STOP K=M/100L=(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/GeVNKKKQ