阅读下列FORTRAN77程序： INTEGER A(4，4)DATA A/1，2，3，4，5，6，7，8，9，10，11，12，13，14，15，16/ WRITE(*，100)FA，3) 100 FORMAT(1X，F4，1)END FUNCTION FB，N) INTEGER B(N，N) F=0.0DO 10K=1，N 10 F=F+B(K，K)END 上述程序运行后，输出结果为( )。
A．19.0
B．9.0
C．8.0
D．18.0