单项选择题

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

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