用VB编程求e^x的近似值，要求最后一项的值<=0.000001时停止计算，e^x=1+x/1!+x^2/2!+···+x^(n-1)/(n-1)

如题所述

推荐答案 2011-04-07

Dim a As Long, s As Long, D As String, e As Long, b As Long
D = 1: a = 1: s = 1
Do Until e > 6
D = ((2 * a) / (2 * a + 1)) * ((2 * a) / (2 * a - 1))
s = s * D
a = a + 1
b = 2 * s
e = Len(b) - InStr(b, ".")
Debug.Print D

DoEvents
Loop
Print b

温馨提示：答案为网友推荐，仅供参考

当前网址：http://99.wendadaohang.com/zd/vejtOvvvX.html

相似回答

VB 计算e的x次方答：Dim x As Integer, a As Double x = Val(InputBox("请输入X的值"))a=exp(x)Print "e^x =" & a End Sub 答案补充：错误在于对Loop While x ^ n / jc(n) < 0.000001的理解，while是当……的时候继续循环，所以你的循环执行了一次，，这时候，因为新增值大于允许误差而提前结束了循环...

编写计算e^x=1+x/1!+x^2/2!+x^3/3!+...+x^n/n!的VB程序答：n=Val(Text2.text)a=exmi(x,n)b=exmi(-x,n)Text3.text=(a+b)/2 End Sub

如何用VB编写出,【二分法求方程近似值】的程序。流程图我有。!答：End Function Function GetFx(ByVal X As Single) As Single GetFx = 2 ^ X + 3 * X - 7 End Function

...e=1+1/1!+1/2!+1/3!+…+1/N!,直到1/N!<0.000001为止.答：clear s=0 n=1 do while .t.m=1 for i=1 to n m=m*i endfor r=1/m s=s+r if r<0.000001 exit endif n=n+1 enddo ?"e=1+1/1!+1/2!+1/3!+…+1/N!=",s

c语言求e的近似值do+while答：} while (fabs(sum) > 0.000001); // 当sum的绝对值小于0.000001时停止循环 printf("e的近似值为：%lf", e);return 0;} 该程序首先从用户输入一个数，然后将初始值设为1,并将num的值赋给sum。接下来使用do-while循环来计算e的近似值。在每次循环中，先计算num的幂次方，然后将其累加到...

C++问题:求e^x=1+x+x^2/2!+x^3/3!+…+x^n/n! (x^n/n!<0.000001)答：改过以后的代码：include<iostream> include<math.h> using namespace std;int main(){ double ex, x, p;int i;cout<<"请输入x："; cin>>x;ex = 0; p = 1; i = 0;while(fabs(p-0)>1e-6){ ex += p;++i;p = p * x / i;} cout<<"e的"<<x<<"次方等于："<<ex<<...

根据公式e=1+1/1!+1/2!+1/3!+...,求e的近似值,精度要求为10-6.答：Option Explicit Private Sub Command1_Click()Dim e0 As Double, e1 As Double, k As Integer e0 = 0: e1 = 1: k = 1 While e1 - e0 > 0.000001 e0 = e1 e1 = e1 + GetResult(k)k = k + 1 Wend Print e1 End Sub Function GetResult(n As Integer) As Double Dim i As ...

...为:1+1/1!+1/2!+1/3!+…+1/n!,直到1/n!<0.000001为止。一定要vfp编 ...答：set talk off ss=1 s=0 i=1 do while ss>0.000001 p=1 for n=1 to i p=p*n endfor ss=1/p s=s+ss i=i+1 enddo ?s

...计算下式的值,直到末项与1差的绝对值小于0.000001.输出要求:直接输出...答：以上代码中，要求0.000001这种精度的计算需要采取double类型，最主要的是d和c在首次循环判断时未经初始化，代码修改如下：include<stdio.h>int main(){ double sum=0.0,a=2,b=1,c,d; do{d=a*a; a=a+2; c=b*(b+2); b=b+2; sum=sum+d/c; }while(d/c-1>=0.000001);printf(...

大家正在搜