VB 1到N的平方求和怎么写。。。。程序
展开全部
Dim sum As Long
Dim i As Integer
Dim n As Long
n = InputBox("n=", "输入")
For i = 1 To n
sum = sum + i ^ 2
Next i
Debug.Print sum
Dim i As Integer
Dim n As Long
n = InputBox("n=", "输入")
For i = 1 To n
sum = sum + i ^ 2
Next i
Debug.Print sum
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
for i=1 to n
m=m+i*i
next
msgbox m
m=m+i*i
next
msgbox m
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
