应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第廿题：100! 的各项和
61/1返回列表
查看: 1406  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
本帖产生 1 个 程序强帖 ，点击这里进行查看

holmescn

金虫 (正式写手)

[交流] Euler 工程 第廿题：100! 的各项和 已有4人参与

由于上面那个题比较简单了。再放一个题吧。这个有点意思了。

已知 n! = n(n-1)(n-2)...1
比如 10! = 10*9*8*7*6*5*4*3*2*1 = 3628800, 其各项和为3+6+2+8+8+0+0=27

那么100!的各项和是多少呢？

这个题用python、matlab、mathematica等支持大数乘法的语言当然很容易就得到结果了。所以这种算法现在Forbidden.

这里给出我用python算的结果为: 648

程序当然就一句（不是我写的）:
CODE:
sum([int(x) for x in str(reduce(lambda x, y: x*y, range(1, 101)))])
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2011-06-02 18:09:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

huycwork

金虫 (著名写手)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 多谢交流 2011-06-04 17:08:17
这样就只好用多项式乘法了呃~
赞一下(2人) 回复此楼
漩涡的中心有一块空地，空空的。
2楼2011-06-02 18:33:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangww2011

木虫 (著名写手)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 多谢交流 2011-06-04 17:08:24
这一题和第16题一个类型
赞一下(2人) 回复此楼
3楼2011-06-02 21:54:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sudo

木虫 (正式写手)
★ ★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 多谢交流 2011-06-04 17:08:37
余泽成(金币+3, 程序强帖+1): 鼓励交流！ 2011-06-04 19:27:16
有点烦心事，今晚不想看书了，来献个丑...
CODE:
#include

int t[200]={1};

int main(){
    int i, j, sum=0, p=0;
    int q, r;
    for(i=2; i<=100; i++){
        for(j=0; j<=p; j++){
            t[j] *= i;
        }
        for(j=0; j<=p || t[j]>=10 ;j++){
            q = t[j]/10;
            r = t[j]%10;
            t[j+1] += q;
            t[j] = r;
        }
        p = j;
    }
    for(i=0; i<=p; i++){
        sum += t[i];
    }
    printf("%d digits in 100!, sum=%d\n", p+1, sum);
}

输出（在codeblocks下的gcc）：
CODE:
158 digits in 100!, sum=648

Process returned 0 (0x0)   execution time : 0.014 s
Press any key to continue.

PS1：咳，我一直觉得附上运行时间毫无意义......应该附上的是算法的时间复杂度比较合理.....

PS2：
100!共有的位数为：
取整(log 1 + log 2 + ... + log 100) + 1 = 158
赞一下(3人) 回复此楼
4楼2011-06-02 22:43:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军
★
dubo(金币+1): 多谢交流 2011-06-04 17:09:54
Forbidden python,我就不贴了,哈哈, 跟楼主那句一模一样
赞一下(1人) 回复此楼
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
5楼2011-06-03 16:38:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)
★
dubo(金币+1): 多谢交流 2011-06-04 17:10:01
引用回帖:
Originally posted by sudo at 2011-06-02 22:43:28:
有点烦心事，今晚不想看书了，来献个丑...

[code]
#include <stdio.h>

int t[200]={1};

int main(){
    int i, j, sum=0, p=0;
    int q, r;
    for(i=2; i<=100; i++){
       ...

主要时间复杂度不是谁都会的。现在参加的人已经很少了，所以就简单点来吧。
赞一下(1人) 回复此楼
6楼2011-06-04 08:44:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 holmescn 的主题更新
61/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 08工科 320总分 求调剂 +6 梨花珞晚风 2026-03-17 6/300 2026-03-21 03:40 by JourneyLucky
[考研] 265求调剂 +3 Jack?k?y 2026-03-17 3/150 2026-03-21 03:17 by JourneyLucky
[考研] 化学求调剂 +4 临泽境llllll 2026-03-17 5/250 2026-03-21 02:23 by JourneyLucky
[考研] 278求调剂 +6 烟火先于春 2026-03-17 6/300 2026-03-21 01:57 by JourneyLucky
[考研] 085600材料与化工 +8 安全上岸！ 2026-03-16 8/400 2026-03-20 22:13 by luoyongfeng
[考研] 350求调剂 +5 weudhdk 2026-03-19 5/250 2026-03-20 22:04 by luoyongfeng
[考研] 265求调剂 +12 梁梁校校 2026-03-19 13/650 2026-03-20 21:01 by 无际的草原
[考研] 求调剂 +5 Mqqqqqq 2026-03-19 5/250 2026-03-20 20:46 by zhukairuo
[考研] 一志愿北京化工大学0703化学318分，有科研经历，求调剂 +4 一瓶苯甲酸 2026-03-14 4/200 2026-03-20 20:36 by fen_rao
[考研] 289求调剂 +6 怀瑾握瑜l 2026-03-20 6/300 2026-03-20 20:30 by 学员8dgXkO
[考研] 261求B区调剂，科研经历丰富 +3 牛奶很忙 2026-03-20 4/200 2026-03-20 19:34 by JourneyLucky
[考研] 广西大学家禽遗传育种课题组2026年硕士招生（接收计算机专业调剂） +3 123阿标 2026-03-17 3/150 2026-03-20 15:58 by 飞行琦
[考研] 08工学调剂 +5 用户573181 2026-03-20 5/250 2026-03-20 15:47 by xia_2003
[考研] 招收调剂硕士 +4 lidianxing 2026-03-19 12/600 2026-03-20 12:25 by lidianxing
[考研] 0703化学 305求调剂 +4 FY_yy 2026-03-14 4/200 2026-03-19 05:54 by anny19840123
[考研] 材料专硕306英一数二 +10 z1z2z3879 2026-03-16 13/650 2026-03-18 14:20 by 007_lilei
[考研] 277调剂 +5 自由煎饼果子 2026-03-16 6/300 2026-03-17 19:26 by 李leezz
[考研] 283求调剂 +3 听风就是雨； 2026-03-16 3/150 2026-03-17 07:41 by 热情沙漠
[考研] 304求调剂 +5 素年祭语 2026-03-15 5/250 2026-03-16 17:00 by 我的船我的海
[考研] 318求调剂 +3 Yanyali 2026-03-15 3/150 2026-03-16 16:41 by houyaoxu
信息提示
关闭
请填处理意见
关闭