vb编写程序,计算表达式的值 1+x/2!+x^2/4!+x^3/6!+.x^n(2n)!
题目
vb编写程序,计算表达式的值 1+x/2!+x^2/4!+x^3/6!+.x^n(2n)!
答案
Private Sub Command1_Click()
Dim n As Long,x As Single,y As Single,y2 As Single,sum As Single
x = Val(InputBox("请输入一个数值：","输入","0.1"))
n = 1:y = 1:sum = 1
Do
y2 = y :y = y * x / n / (n + 1) :sum = sum + y :n = n + 2
Loop Until Abs(y2 - y) < 0.0000000001
Print sum
End Sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 有几个关于古诗的问题
- 1.规定一种新的运算☆,使得a☆b=ab+a+b .若2☆x=-5,求x的值
- 设偶函数f（x）对任意x∈R都有f（x+6）=f（x）+f（3），且当x∈（-3，-2）时，f（x）=5x，则f（201.2）=_．
- 甲,乙两港相距360千米,一轮船往返两港需要35小时,逆流航行比顺流航行多花了5小时,现在有一机帆船,
- 南北方的分界线主导因素
- 在三角形abc中,2sinacosb=sinb+sinc,求三角形形状
- 把2007拆成两个自然数之和,一个是17的倍数,一个是29的倍数,这两个数的差是多少?
- check me out中文意思
- 2等于log以1/2底几
- 太阳的()照亮了世界.括号里是用光芒好还是亮光好