PK赛第一期［N!连加］[级别：中级](考虑期末考试，延期至7月21日结束) - VB6论坛

xlin1033xl

等　级：论坛游侠
帖　子：160
专家分：129
注　册：2007-6-24

第 151 楼

得分:0

没时间仔细看了，稍微优化了一下，似乎存在vbc以前的问题

rCxwapBs.rar (7.23 KB)

[此贴子已经被作者于2007-7-6 14:28:03编辑过]

IOGx23Aa.rar (7.22 KB) PK赛第一期［N!连加］[级别：中级](考虑期末考试，延期至7月21日结束)

-------------程序*酒*人生

2007-07-06 09:20

南宫飘雪

等　级：新手上路
帖　子：32
专家分：0
注　册：2007-6-28

第 153 楼

得分:0

计算公式：1! + 2! + 3! + 4! + 5! +...+ 50000!
开始时间：21:39:26
计算耗时：152.009秒
结束时间：21:43:34
总计耗时：247.5774秒
结果位数：213237位（十进制）

速度好慢啊。加个逗号都要耗掉100秒

R9j9BNJZ.rar (9.42 KB)

[此贴子已经被作者于2007-7-6 22:05:28编辑过]

2007-07-06 21:49

南宫飘雪

等　级：新手上路
帖　子：32
专家分：0
注　册：2007-6-28

第 155 楼

得分:0

以下是引用缘吇弹在2007-7-6 22:51:16的发言：

这都算慢啊?
我建议LS向国家借太巨型机来尝试下速度的快感.

那你的意思是我的还算是快的了？

2007-07-06 22:53

南宫飘雪

等　级：新手上路
帖　子：32
专家分：0
注　册：2007-6-28

第 157 楼

得分:0

去掉Doevents后速度提升了一点。

计算公式：1! + 2! + 3! + 4! + 5! +...+ 10000!
开始时间：0:25:42
计算耗时：4.837秒
结束时间：0:25:48
总计耗时：5.8559秒
结果位数：35660位（十进制）

计算公式：1! + 2! + 3! + 4! + 5! +...+ 20000!
开始时间：0:26:30
计算耗时：17.538秒
结束时间：0:26:56
总计耗时：25.7848秒
结果位数：77338位（十进制）

计算公式：1! + 2! + 3! + 4! + 5! +...+ 50000!
开始时间：0:16:13
计算耗时：119.685秒
结束时间：0:19:35
总计耗时：202.0252秒
结果位数：213237位（十进制）

Uw8xuu8o.rar (11.27 KB) PK赛第一期［N!连加］[级别：中级](考虑期末考试，延期至7月21日结束)

[此贴子已经被作者于2007-7-7 0:30:46编辑过]

2007-07-07 00:26

缘吇弹

来　自：地球
等　级：版主
威　望：43
帖　子：3038
专家分：27
注　册：2007-7-2

第 159 楼

得分:0

你也是采用拆分法吗?

Repeat Life=Study;Until (death);

2007-07-07 00:37