当前位置:首页 → 建筑工程 → 注册环保工程师 → 注册环保工程师公共基础->阅读FORTRAN程序:READC*,*)I,J,KDO10
阅读FORTRAN程序:
READC*,*)I,J,K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUE
WRITE(*,20)I,J,K 20 FORMAT(2X,315)
END
键盘输入1,0,0则程序运行后的输出结果是:
解当N=1时,I=l+0+0==l,J=l+0+0=l,K=l+l+0=2;
当N=2时,I=l+l+2=4,J=4+2+l=7,K=4+7+2=13。
答案:A









