在窗体上添加如下命令按纽，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a(10)As Integer
Dim p(3)As Integer
k= 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
Print k
End Sub
该过程的运行结果为______。

A．35

B．33

C．31

D．29

锅炉运行中如何防止和减小热偏差的产生？