齿轮设计 发表于 2004-10-12 15:36:00

开三次方的函数,有没有更好的方法

因求开三次方,哪里也找不到现成函数,乱编了一个,有更好的请跟帖


' 求三次方函数<BR>Function ddd(a As Double) As Double<BR>                       ddd = Sqr(Sqr(a))<BR>                       While Abs(a - ddd ^ 3) &gt; 0.000001<BR>                       ddd = ddd + (Sqr(12 * ddd * a - 3 * ddd ^ 4) - 3 * ddd ^ 2) / 6 / ddd ^ 2 - ((Sqr(12 * ddd * a - 3 * ddd ^ 4) - 3 * ddd ^ 2) / 6 / ddd ^ 2) ^ 4<BR>                       Wend<BR>End Function

alin 发表于 2004-10-12 18:52:00

EXP(LOG(a)/3)

雪山飞狐_lzh 发表于 2004-10-12 22:36:00

a ^ (1 / 3)

齿轮设计 发表于 2004-10-17 13:10:00

这么简单,就是想不到。谢谢
页: [1]
查看完整版本: 开三次方的函数,有没有更好的方法