(来学网)阅读下列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
D0 10 K=1,N
10 S=S*A(M,K)
END
运行以上程序后,其输出结果为( )。
  • A.
    (来学网)45
  • B.
    (来学网)80
  • C.
    (来学网)15
  • D.
    (来学网)120
正确答案:
B
答案解析:
数组A的值为
当K=1时,S=1×A(2,1)=2,依此类推