由于某种原因，如不可抗力因素影响、发包人违约，使工程被迫在竣工前停止实施，并不再继续进行，使承包人蒙受经济损失，因此提出的索赔属于( )。

A．不可预见的外部障碍或条件索赔

B．工程终止索赔

C．工程变更索赔

D．工期拖延索赔

设有如下程序：
Private Sub Command1_Click()
Dim sum As Double，x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next i
End Sub
该程序通过For循环来计算一个表达式的值，这个表达式是( )。

A) 1+1/2+2/3+3/4+4/5
B) 1+1/2+1/3+1/4+1/5
C) 1/2+2/3+3/4+4/5
D) 1/2+1/3+1/4+1/5