阅读下列FORTRAN77程序： INTEGERA(3，3) DATAA/1，2，3，4，5，6，7，8，9/ S=0.0 DO10I=1，3 J=MOD(I，3)+1 S=S+A(I，J) 10CONTINUE WRITE(，)S END 上述程序运行后，输出的S值为()。

发布于 2022-03-15

岩土基础知识

约 1 分钟学习

题目类型：单选题

题目内容

阅读下列FORTRAN77程序： INTEGERA(3，3) DATAA/1，2，3，4，5，6，7，8，9/ S=0.0 DO10I=1，3 J=MOD(I，3)+1 S=S+A(I，J) 10CONTINUE WRITE(*，*)S END 上述程序运行后，输出的S值为()。

A的值为，当Ⅰ=1时，J=MOD(1，3)+1=2，S=0+A(1，2)=4；当Ⅰ=2时，J=MOD(2，3)+1=3，S=4+A(2，3)-12；当I=3时，J=MOD(3，3)+1=1，S=12+A(3，1)=15