51问答网 > 以vb程序表达式1^2-2^2+3^2-4^2+…+(N-1)^2-N^2

以vb程序表达式1^2-2^2+3^2-4^2+…+(N-1)^2-N^2

2024-12-17 18:35:50

推荐回答（4个）

回答1：

Private Sub Command1_Click()
Dim n As Long, sum As Double
n = Val(InputBox("n=?"))
For i = 1 To n
sum = sum + (-1) ^ (i - 1) * i ^ 2
Next i
MsgBox "所求的和为：" & sum
End Sub

回答2：

Private Sub Command1_Click()
Dim n As Single, s As Double
n = Val(InputBox("n=?"))
For i = 1 To n
s = s + (-1) ^ (i - 1) * i ^ 2
Next i
print "和为：" & s
End Sub

回答3：

看不明白

回答4：

哇哇

最新问答

信用卡逾期违约金怎么算，信用卡逾期利息怎么算

什么样的睡眠才是高质量的睡眠?如何获得高质量的睡眠?

液晶显示器驱动板几种常见故障的检修

如何利用Java应用程序编写要求输入两个整数并计算两个数据之和？

我的妈妈作文600字一件事

京港澳高速鹤壁驾车到郑州世纪欢乐园高速路线

2000到3000元左右什么手机性价比最合适？

北京电影学院是什么样的学校

电脑坏了，把硬盘给拆了，想买个移动硬盘盒装上然后把C盘桌面的文档拖出来，可行吗？

电子商务学的是什么？毕业后能从事什么工作？