题型:问答题 简答题 阅读下列FORTRAN77程序:INTEGERA(4,4)DATAA/1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16/WRITE(*,100)F(A93)100FORMAT(1X,F4.1)ENDFUNCTIONF(B,N)INTEGERB(N,N)F=0.0D010K=1,N10F=F+B(K,K)END上述程序运行后,输出结果为()。A.19.0 B.9.0 C.8.0 D.18.0 查看答案