编写程序，求s=1×2×3 +2×3×4+……+n×(n+1)×(n+2)的值。n由文本框输入

来源：百度知道 编辑：UC知道 时间：2024/05/13 20:03:06
利用VB编写

Private Sub Command1_Click()
Dim n As Integer, i As Integer, s As Long
n = Val(Text1.Text)
If n < 1 Then
Label1.Caption = \"输入错误\"
Else
s = 0
For i = 1 To n Step 1
s = s + i * (i + 1) * (i + 2)
Next i
Label1.Caption = s
End If
End Sub

Private Sub Command1_Click()
Dim n As Integer
Dim s As Long
s = 1
n = Val(Text1.Text)
For n = n + 2 To 1 Step -1
s = s * n
Next n
Print s
End Sub

VB不怎么擅长
C的怎么样,原理应该差不多
int n;
long sum=0;
scanf("%d",&n);
for(int i=1;i<=n;i++) sum+=i*(i+1)*(i+2);
printf("sum is %d",sum);