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