阅读下列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