ceva dsp SOC:如何用VB计算e=1/1!+1/2!+1/3!+1/4!+…+1/n!

来源:百度文库 编辑:神马品牌网 时间:2024/04/27 23:38:56
谢谢大家

楼上两位答的^^
1. for循环之后是不能随便用未知数n的
2.要知道e是一个常数 所以应是
private sub cmd1_click
dim fac as long,e as long
fac=1
while 1/fac>=0.000001
fac=fac*n
e=e+1/fac
wend
print "e =";e
end sub

设阶乘地为fac
For i=1 to n
fac=fac*i;
e=e+1/fac
这样就可以了。我不是VB的。我是学Pascal的。原理都一样

楼上的没有初始化变量:
应该是:
fac=1
for i=1 to n
fac=fac*n
e=e+1/fac
next i
print e

^_^