阅读下列FORTRAN程序：DIMENSIONA(3)DATAA/3.0，2.0，1
题型：单项选择题
问题：
阅读下列FORTRAN程序：
DIMENSIONA(3)
DATAA/3.0，2.0，1.0/
X＝F
(A)
WRITE(*，100)X
100FORMAT(1X，F3.1)
END
FUNCTIONF
(B)
DIMENSIONA(3)，B(3)
DO10I＝1，3
10A(1)＝B(1)-I
F＝A(1)+A(2)+A(3)
X＝1.0-F
END
执行上述程序后，输出的X值为（）。
A．1.0
B．0.0
C．6.0
D．-5.0