VB编程:1使用公式e=1+1/1!+1/2!+1/3!+……求e的近似值,要求计算到最后一项小于10^-8为止 浏览次数:20次

日期:2011-05-18 16:53:56 人气:1

VB编程:1使用公式e=1+1/1!+1/2!+1/3!+……求e的近似值,要求计算到最后一项小于10^-8为止 浏览次数:20次

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 你试试,大概这个思路,语法你再调一调,我手头没装软件。
    A+
热门评论