首页

116问答网 > VB编程求f=1-1⼀(2*3)+1⼀(3*4)-1⼀(4*5)+……+1⼀(19*20)

VB编程求f=1-1⼀(23)+1⼀(34)-1⼀(45)+……+1⼀(1920)

2025-06-23 08:16:48

推荐回答（1个）

回答1：

Dim i As Integer
Dim s As Double
Dim n As Double
s = 1
For i = 2 To 19
n = 1 / (i * (i + 1))
If i Mod 2 = 0 Then n = -n
s = s + n
Next
Print s

相关问答

最新问答

玩cf大炮一开枪声音就断断续续

鹿晗特显小的照片，是和一只鹿做放一起的。

刚刚又回坑剑灵。想问一下现在的平民装备是怎么样的，武器和首饰分别需要大约多少钱，只有45级耀光传说

彗星顶部的冲击力约是多少牛顿？

qq会员怎么激活京东会员

拉肚子后擦肛门有点疼怎么回事

“函授本科”怎么评职称？

血旺吃了有什么功效,?上火吗,?

求卡罗尔高清网盘链接

急求植物大战僵尸像素高的图片（植物和僵尸的大图）