求编写程序 求1+(1+2)+...+(1+2+...+100)的值

来源：百度知道 编辑：UC知道 时间：2024/06/07 10:42:04
求1+(1+2)+...+(1+2+...+100)的值
我要求编写的程序是VB 程序来的

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim m As Long
For a = 1 To 100
b = a + b
m = m + b
Next a
Print m
End Sub

拿分`

50050

#include "stdio.h"
int SUM(int a)
{
int i,sum=0;
for(i=1;i<=a;i++)
sum=sum+i;
return (sum);
}

void main()
{
long int i,a=0,b=0;
for(i=1;i<=100;i++)
{
b=SUM(i);
a=a+b;
}
printf("%ld",a);
}