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

对诊断CO中毒最有帮助的是（）

A.血网织红细胞数

B.血还原血红蛋白

C.血糖化血红蛋白

D.血碳氧血红蛋白

E.血气分析