问题
单项选择题
阅读下列FORTRAN77程序:
EXTERNALPP
INTEGER P,PP,Q(4,4)
DATAQ/1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16/
WRITE(*,*)P(Q,4,PP)
END
INTEGER FUNCTION PP(B,N)
INTEGERB(N,N)
PP=0
D010K=1,N
10PP=PP+B(K,K)
END
INTEGER FUNCTIONP(B,N,S)
INTEGER S,B(N,N)
P=0
D()10K=1,N
10P=P+S(B,K)
END
运行上述程序后,输出的结果为()。
A.55
B.56
C.57
D.58
答案
参考答案:A
解析:
将数组和函数作为参数调用函数。
[点评] 该题考察Fortran的函数调用和参数