> 数学 >
编写程序,求下面数列的前20项的和,结果保留2位小数.1,-1/(1+3),1/(1+3+5),...,(-1)^(n+1)/(1+3+5+...+
人气:184 ℃ 时间:2020-09-18 13:15:02
解答
Dim i,t,s1 As Integer
Dim s As Single
s = 0
s1 = 0
t = 1
For i = 1 To 20
s1 = s1 + 2 * i - 1
s = s + t / s1
t = -t
Next i
Print Round(s,2)
推荐
猜你喜欢
© 2025 79432.Com All Rights Reserved.
电脑版|手机版