1/2+1/5+1/8+1/11+.......+1/152=?

来源:百度知道 编辑:UC知道 时间:2024/06/17 00:57:22

=1.74453392208835

利用vb计算所得
Dim a, c As Double
c = 2
For i As Long = 2 To 10000
a += 1 / c
c += 3
If c = 152 Then
Exit For
End If
Next
MsgBox(a)

1/2*385+1/3*385+1/5*385+1/7*385+1/13*385=1/2*385+1/3*385+77+55+35+1/13*385

=167+385*(1/2+1/3+1/13)=167+385*71/78

385*71/78约等于385*0.9103=350.4655

167+385*71/78=167+350.4655=517.4655

计算结果的整数部分是517。