00问答网
所有问题
编写一个vb程序计算1/1!+1/2!+…+1/n!,要求定义一个函数来计算n!。
如题所述
举报该问题
其他回答
第1个回答 2013-09-24
function jiecheng(s)
m=1
n=1
if s=1 then
jiecheng=1
else
for i=2 to s
n=(i-1)*i
m=m+1/n
end for
jiecheng=m
end if
end function
大概是这样的,很久没用过VB了,所以具体的一些细节记不清楚了
第2个回答 2013-09-24
Function F(N As Integer) As Double
Dim s As Long
s = 1
For i = 1 To N
s = s * i
Next
F = 1 / s
End Function
相似回答
1+1
/
2+……+1
/(
n
-1)+1/n的
vb
编程怎么写?
答:
ln(1+x) < x 对一切 x> 0 成立nsuy于是:ln((
1+1/2
)(1+2/4)(1+3/8)(1+4/16)……(1+n/2^n))= ln(1+ 1/2) + ...+ln(
1+n/
2^n) < 1/2+......
vb程序
里
计算1
/
1!+1
/
2!+1
/3!+1/4!+...+1/
n!
???
!!
答:
For i = 1 To n t = t * i s = s + 1 / t Next i Text2.Text = s End Sub
在
vb程序
中
,计算1+1
/
2+1
/3
+……+1
/
n
的程序
答:
VB
.NET代码:dim i,n as Longdim s as Doublen=Console.ReadLine()s=0.0for i=n to 1 step -1s=s+1.0/inext iConsole.WriteLine("s={0:e}",s)Console.WriteLine("s={0:g}",s)
编写一个vb程序,
求
1+1
/
2+1
/3+1/4
+……+1
/
n
的值。(测试数据:n=50 答...
答:
Click() Print "第4题:"; Dim n As Integer, s As Double n = InputBox("n=", , 50) For i = 1 To n s = s + (-1) ^ (i - 1) * (1 / i) Next i Print "Sum("
&
n
& ")="; Format(s, "0.00")End SubPrivate Sub Command3_Click()...
大家正在搜
vb怎么编写计算器程序
vb编写简易计算器程序
vb如何编写程序代码
用vb编写简单小程序实例
vb编写各种趣味小程序
vb编写简单的画图程序
用vb编写红绿灯小程序
vb编写计算器
用vb编写发红包程序
相关问题
VB编写函数,实现计算1!+2!+…+N!
编vb程序计算1-1/2!+1/3!-1/4!+···+(-...
编写一个vb程序,求 1+1/2+1/3+1/4+……+1/...
vb程序设计:1要求编写一个过程函数N,2、编写一个过程调用...
VB编程 计算1-1/2!+1/3!-1/4!+.....+...
VB题:e=1+1/1!+1/2!+1/3!+...+1/n...
编写程序计算s=1+1/(2!)+1/(3!)+...+1/...
vb编写程序,计算s=1+(1+2)+(1+2+3)+…+(...