首页

58问答库 > vb：求s,s=1+1⼀2*2+1⼀3*3+1⼀4*4+...1⼀10*10

vb：求s,s=1+1⼀22+1⼀33+1⼀44+...1⼀1010

2024-11-22 04:01:57

推荐回答（3个）

回答（1）：

Private Sub C1_Click()
Dim a, s As Single
For i = 1 To 10
a = 1 / (i * i)
s = s + a
Next
Print s
End Sub

回答（2）：

Private Sub C1_Click()
Dim a, s As Single
For i = 1 To 10
a = 1 / (i * i)
s = s + a
Next

回答（3）：

1

相关问答

最新问答

华硕飞行堡垒zx53v怎么样

2019年全国二卷高考题相比往届难度如何？

一部老电影，九几年看过的VCD，外国的恐怖片。

打火机磨轮不动了怎么办

小米手机重起后，桌面会多出同样的图标，如查删除的话两个同时卸载了，比如，同时出现两个360

传奇里怎么把金币变成金条

想给女儿取名字，女儿2012年8月28日晚7点出生，爸爸姓李，妈妈姓古，忘高人指点

惠普1505n打印机为什么打印很淡

吉他左手松弦后打品怎么解决

说一个人很官方,是什么意思?