阅读程序：
Option Base 1
Private Sub Form_Click()
Dim arr, Sum
Sum=0
art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)
For i=1 To 10
If arr(i)/3=arr(i)\3 Then
Sum=Sum+arr(i)
End If
Next i
Print Sum
End Sub
程序运行后，单击窗体，输出结果为______。

A．13

B．14

C．27

D．15

当事人订立了一份违反国家强制性标准的设备工程采购合同，在工程验收时双方对工程的质量认定发生争议而诉至人民法院，人民法院认定合同中的质量条款无效，此时，（）。

A．合同所有条款均无效

B．其余部分无效

C．不影响其余部分的效力

D．由法院决定合同是否有效