设有如下程序:Private Sub Commandl Click()Dimsum As Double x As D0ublesum=0n=0For i=1 To 5x

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

A．1+1/2+2/3+3/4+4/5

B．1+1/2+2/3+3/4

C．1/2+2/3+3/4+4/5

D．1+1/2+1/3+1/4+1/5

请帮忙给出正确答案和分析，谢谢！