单选题 阅读下列FORTRAN程序：
REAL A(5)
COMMON /CC/X
DATA A/1，2，3，4，5/
X=0
Y=FUN(A，5) +FUN(A，5)
WRITE(*，*) Y
END
FUNCTION FUN(A，N)
REAL A(N)
COMMON /CC/X
X=X+1
F=1
DO 10 I=N，1
F=F+A(I)
10 CONTINUE
FUN=F+X
END
上述程序执行后，输出结果是( )。
A．4.0 B．5.0 C．16.0 D．33.0