VB编程：1使用公式e=1+1/1!+1/2!+1/3!+……求e的近似值，要求计算到最后一项小于10^-8为止 浏览次数：20次
1个回答
展开全部
function jiecheng(i as integer)as double
for j=1 to i
jiecheng*=i
next
end function
dim e=0
dim i=0
do
e+=1/jiecheng(i)
i+=1
t=1/jiecheng(i)
while t>10^-8
你试试，大概这个思路，语法你再调一调，我手头没装软件。
for j=1 to i
jiecheng*=i
next
end function
dim e=0
dim i=0
do
e+=1/jiecheng(i)
i+=1
t=1/jiecheng(i)
while t>10^-8
你试试，大概这个思路，语法你再调一调，我手头没装软件。
来自：求助得到的回答
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
