用VBA计算100000！

ShuXueZhenMiHu · 发表于 2020-9-27 09:51:57

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？欢迎注册

×

为什么我用VBA写的计算阶乘的程序很慢？计算100000！需要大约400秒，这正常吗，对于VB类程序？

mathematica · 发表于 2020-9-27 11:38:29

比我牛逼多了，我只会用软件

.·.·. · 发表于 2020-9-27 22:29:03

能贴一下程序吗？

风云剑 · 发表于 2020-10-1 20:33:05

现在Basic很少用了，我这有个十几年前的，可以参考

ShuXueZhenMiHu · 发表于 2020-10-2 07:41:57

计算100000阶乘有错误，计算10000阶乘需要10秒。跟我编的计算器的性能差不多。

northwolves · 发表于 2020-10-2 22:42:46

大数阶乘的计算(六)

十六年前我也曾写过VB系列的大数阶乘计算，供参考。

当时CSDN算法版已经在讨论如何1秒钟计算一亿或10亿的阶乘了

northwolves · 发表于 2020-10-2 22:51:18

楼主可以研究一下郭老师16年前的算法，当时的配置HugeCalc计算100000！的阶乘需要0.07秒

高精度快速阶乘算法

ShuXueZhenMiHu · 发表于 2020-10-3 07:36:51

本帖最后由 ShuXueZhenMiHu 于 2020-10-3 07:37 编辑

用Excel中的VBA做的。没有采用特殊的算法，就是硬乘。这已经是我VB编程能力的极限了。末尾的零们没有参与运算。

northwolves · 发表于 2020-10-3 11:37:54

预估位数
long型数组存储
可以每8位一组
分解因数优化运算，尽可能多的平方运算
预存一些小数字的阶乘结果

dlpg070 · 发表于 2020-10-3 11:54:54

ShuXueZhenMiHu 发表于 2020-10-3 07:36
用Excel中的VBA做的。没有采用特殊的算法，就是硬乘。这已经是我VB编程能力的极限了。末尾的零们没有参与 ...

参考一下 mathematica的结果
{10!,    1.92435*10^-6 秒 }
{100!,    6.09377*10^-6 秒 }
{1000!, 8.98029*10^-6 秒 }
{10000!, 0.000389039 秒 }
{100000!,  0.0101275    秒 }
{1000000!, 0.204683    秒 }
{10000000!,3.89173    秒 }

账号		自动登录	找回密码
密码			欢迎注册

[讨论] 用VBA计算100000！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。