利用递归思想解决问题

利用递归思想解决问题
研究问题：求0-100的和
Private Sub Command1_Click()
Print Str(f(100))
End Sub
Function f(n As Integer) As Integer
If n = 1 Then
   f = 1
Else
   f = n + f(n - 1)
End If

End Function
过程的递归应用是一种特殊的过程嵌套，此思想运用的是一个过程调用过程本身。当一个大问题分解成同类型的小问题时，问题的规模在逐渐减小，而且小问题的解法与原来大问题的解法相同。另外此题有明确的结束递归的条件，所以运用递归思想解题过程更加简洁。