阅读下列FORTRAN77程序：DIMENSIONA（3，3)D0100K＝1，3D0100J＝1，3100A（K，J)＝K＋JS＝P（A，2，8)WRITE（*，*)-学而优知识库

阅读下列FORTRAN77程序：DIMENSIONA（3，3)D0100K＝1，3D0100J＝1，3100A（K，J)＝K＋JS＝P（A，2，8)WRITE（*，*)

阅读下列FORTRAN77程序：
DIMENSIONA(3，3)
D0100K＝1，3
D0100J＝1，3
100A(K，J)＝K+J
S＝P(A，2，8)
WRITE(*，*)S
END
FUNCTIONP(B，M，N)
DIMENSIONB(N)
P＝0.0
D010K＝M，N
10P＝P+B(K)
END
运行上述程序后，输出的S值为()。
(A) 20.0
(B) 24.0
(C) 28.0
(D) 32.0

参考答案

查看答案