单项选择题

设有如下程序：

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循环来计算一个表达式的值，这个表达式是( )。

点击查看答案&解析