vb程序编码,计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/14 19:22:58
vb程序编码,
计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
Dim s As Double, x As Single, t As Double, n As Integer, m As Integer, fact As Double
x = Rnd + 1
n = 2
s = -x
Do
m = 2 ^ (n - 1)
fact = 1
For i = 1 To 2 * n - 1
fact = fact * i
Next i
t = (-1) ^ n * (2 * n - 2) * x ^ m / fact
s = s + t
If (2 * n - 2) * x ^ m / fact < 10 ^ (-5) Then Exit Do
n = n + 1
Loop
Print "当最后一项等于" & (2 * n - 2) * x ^ m / fact & "时," & "s" & " = " & s
编码大概这样写,但是由于数值太大,会提示溢出错误.VB中没有提供可以存储这么大数的数值类型.
vb程序编码,计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
vb编写程序,计算表达式的值 1+x/2!+x^2/4!+x^3/6!+.x^n(2n)!
编写程序,单击计算按钮,则计算下面表达式的值,要求精度为第n项的值小于0.00001. S=1+2x/x2+3x/x3+……程序界面如下:比如输入x为3,结果是2.249995.这题是用vb编程,x是大于1的,至于x公式是怎样理解,
用vb写牛顿迭代法程序解方程用牛顿迭代法解此方程,请高手帮我写个完整程序,本人菜鸟,写出的表达式老是编译错误.f(x) = (0.366 * q / m / s) * Log(10 * s * sqr(x) / r) - x式中:q,m,s,r都是常量计算
随机生成数字,计算平均值,求vb程序编码!
请教大神用VB编一个计算的程序?求公式 p=v*Z*F(s,x,y).其中F(s,x,y)=π/M,M=ln[2ch(πs/2y)]+ln{[shπ(x/y-s/2y)*shπ(x/y+s/2y)]/[shπ(x/y-s/y)*shπ(x/y+s/y)]}.
用vb计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5).急用
vb编写一个计算表达式m!/n!(m-n)!值的程序(m>=n>=0),要求:用输入对话框输入m和n的值,用编写函数Function fact(x as integer)求x!的值.
VB,计算S=1!+2!+3!+4!+5!的程序.
用VB程序写出计算s=1!+2!+3!+…+50!的值.
VB 下列程序段的执行结果为 X=2 Print X+1;X+1
在VB程序中,能表示X或Y小于Z的表达式是?
VB执行下列程序: X = 0 Do While X
VB中 表达式 X=2^-2 PRINT X 结果是啥?
vb编写程序,利用下面的公式计算cosx的近似值cosx=1-x^2/2!+x^4/4!.+x^(2n)/(2n)!我写的代码:Private Sub Command1_Click()Dim x As Single,t As Single,s As Single,n As Integerx = Val(Text1.Text)s = 1:t = 1:n = 1Dot = (-1) * t * (x ^ (2
vb中,设x=5,表达式“10
VB 练习题1、sin15+的VB表达式为().2、把X是5或7的倍数写成VB表达式是().3、表达式Ucase(Mid(abcdefgh , 3 , 4))=(4 ).4、k=123%,则Len(Str(k))=(120% ).5、表示变量S是字母(不分大小写
编写程序求表达式s=x/2!+x^3/4!+.+x^(2n-1)/(2n)!的值.要用c语言,