下列程序运行时输出的结果是( )。
Option Base 1
Const a=10
Private Sub Form_Click0
Dim x(a)As Integer
k=-1
For i=1 To a
x(i)=i*k
k=(-1)*k
Next i
For i=1 To 10
Print x(i)
Next i
End Sub

A．1 3 5 7 9 10

B．-1-3-5-7-9

C．-1 2-3 4-5 6-7 8-9 10

D．1-2 3-4 5-6 7-8 9-10

如果在建设工程施工合同履行过程中，承包人提出了分包要求，则（）

A.只需经过发包人的书面同意即可

B.只需经过监理机构的书面同意即可

C.需经过发包人的书面同意，同时也应提请监理机构同意

D.任选发包人和监理机构同意都行