单选题
阅读下列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
A
B
C
D
【正确答案】
C
【答案解析】
[解析] 主程序中的二维数组A作为实参与函数的形参一维数组B对应。
[点评] 该题考察Fortran的函数调用
提交答案
关闭