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