Question

请设计出1+(1+2)+(1+2+3)+(1+2+3+4)+.....+(1+2+3+4+......+100)的程序图？（用基本算法语句回答）

设计出程序图即可

Answer 1

定义3个int函数变量i,j,h

for (h=1;h++;h<=100)
for (i=1;i++;i<=h)
{j=j+i;}

j为全局变量初值为0，设立两层循环关系

两层循环完毕以后，j的最终值即为所求结果

Answer 2

在调用的地方AddNaturalNumber(自然数)
Private Function AddNaturalNumber(n As Integer)
Dim I As Integer
Dim Sum As Long
For I = 1 To n
Sum = Sum + n;
Next I
If n > 1 Then
Sum = Sum + AddNaturalNumber(n - 1)
End If
AddNaturalNumber = Sum
End Function

Answer 3

不懂啊