以下程序的输出结果是( )。 Option Base 1 Private Sub Command1 Click() Dim a(10)，p(3)as Integer k=5 For I=1 to 10a(i)=INext I For j=1 to 3p(i)=a(I*j)Next j For I=1 to 3k=k+p(I)*2 Next I Print k End Sub

A．33

B．28

C．35

D．37

强化锅炉燃烧时，应先增加（）量，然后增加（）量。