编写程序,求下面数列的前20项的和,结果保留2位小数.1,-1/(1+3),1/(1+3+5),...,(-1)^(n+1)/(1+3+5+...+

编写程序,求下面数列的前20项的和,结果保留2位小数.1,-1/(1+3),1/(1+3+5),...,(-1)^(n+1)/(1+3+5+...+

题目
编写程序,求下面数列的前20项的和,结果保留2位小数.1,-1/(1+3),1/(1+3+5),...,(-1)^(n+1)/(1+3+5+...+
答案
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)
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
最新试题
热门考点

超级试练试题库

© 2017-2019 超级试练试题库,All Rights Reserved.