问题 单项选择题

阅读下列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的函数调用和参数

单项选择题
单项选择题 A1/A2型题