VB常用十大算法(共15页).doc

1. 累加与连乘1、算法说明 分析累加形式：V=V+e 连乘形式：V=V*e其中：V是变量，e是递增表达式。累加和连乘一般通过循环结构来实现。注意：需在执行循环体前对变量V赋初值。一般累加时置初值0；连乘时置初值为1。举例求N!的结果。Private Sub Command1_Click() Dim n%, i%, s& n = Val(InputBox(输入n) s = 1 For i = 1 To n s = s * i Next i Print sEnd Sub应用举例 根据下列公式，求自然对数e的的近似值。要求：误差小于0.00001Private Sub Command1_Click()Dim i%, n&, t!, e!e = 2 i = 1 t = 1 Do While t 0.00001i = i + 1t = t / ie = e + tLoo