阅读程序：Option Base 1Private Sub Form_Click( )Dim arr，SumSum=0arr=Array(1，3，5，7，9，11，13，15，17，19)For i=1 To 10If arr(i)/3=arr(i)\3 ThenSum=Sum+arr(i)End IfNext iPrint SumEnd Sub程序运行后，单击窗体，输出结果为（ ）。

A．13

B．14

C．27

D．15

人体单位时间内的蒸发散热量仅决定于下列因素（）。

A.皮肤表面积和蒸发散热系数

B.服装的热阻值

C.环境的相对湿度

D.上述全部因素