=n(n+1)(2n+1)/6 (公式）
VB程序设计题(求和1的平方加2的平方一直加到n的平方)
Private Sub Form_Load()Dim sum As LongDim i As Integer, n As Integersum = 0n = Int(InpubBox("请输入n的值"))For i = 1 To n sum = sum + i ^ 2NextMsgBox "平方累加和为" & sumEnd Sub
用VB如何编写1的平方加2的平方加3的平方加到N的平方程序
n=Val(inputbox("请输入N"))For i=1 to n s=s+i^2 Next Msgbox "计算结果为" & s
编程,1的平方加2的平方加到n的平方 当n=8时的答案
int sum =0;for(int i=1;i<=8;i++){ sum =sum+ n*n;} System.Out.print(sum);
急事哦 用程序计算数学表达式1的平方-2的平方+3的平方-4的平方+...
用vb编程，先画一个按钮。然后写下列代码。Private Sub Command1_Click()n = Val(InputBox("输入n"))For i = 1 To n j = j + ((-1) ^ (i + 1)) * (i ^ 2)Next i Form1.Print j End Sub 记得加分哈
VB程序1的平方加2的平方一直加到39的平方用Flash怎么写
Dim i%, a%, s s = 0 For i = 1 To 39 Step 1 s = s + i ^ 2 Next i Print s 答案提交后才发现你要的是flash代码。这个我没做过。抱歉。
1的平方+2的平方一直加到100的平方除以7的余数是多少
1^2+2^2+...+100^2=100*(100+1)*(2*100+1)\/6=100*101*201\/6=50*101*67=(49+1)*(98+3)*(63+4)所以，上式除以7的余数为1*3*4除以7的余数，即为5。
一加二的平方加三的三次方加到十的十次方 编VB程序
Private Sub form_click()Dim i, j, k, sum As Single sum = 0 For i = 1 To 10 k = i ^ i Print "k^" & i;Print i, k;Print sum = sum + k Next Print sum End Sub
VB1到N的平方求和怎么写.程序
Private Sub Form_Load()Dim sum As LongDim i As Integer, n As Integersum = 0n = Int(InpubBox("请输入n的值"))For i = 1 To n sum = sum + i ^ 2NextMsgBox "平方累加和为" & sumEnd Sub
求用vb实现1到100的和加上1到50的平方和加上1到1\/10的和的代码是多少...
现在窗口画一个Command1 代码：Private Sub Command1_Click()Dim s As single s = 0 For i = 1 To 100 s = s + i Next For i = 1 To 50 s = s + i ^ 2 Next For i = 1 To 10 s = s + 1 \/ i Next MsgBox s End Sub ...
求1-10的平方和。vb编程给代码
接下来，编写VB代码实现求1-10的平方和功能。在VB.NET中，可以采用循环结构来实现这一目标。这里，我们将使用`For`循环遍历1到10的整数，并计算每个整数的平方，最后将所有平方值相加，得到最终结果。vb Module Module1 Sub Main()Dim sum As Integer = 0 For i As Integer = 1 To 10 sum +=...
