问题 单项选择题

阅读下列FORTRAN程序:
INTEGER X(3,3)
DATA X/1,2,3,4,5,6,7,8,9/
WRITE(*,*)S(X,3,2)
END
FUNCTION S(A,N,M)
INTEGER A(N,N),S
S=1
DO 10 K=1,N
10 S=S*A(M,K)
END
运行以上程序后,其输出结果为( )。

A.45
B.80
C.15
D.120

答案

参考答案:B

解析:[*]
当K=1时,S=1×A(2,1)=2,依此类推

配伍题
单项选择题