24小时热门版块排行榜    

查看: 1518  |  回复: 18
本帖产生 5 个 程序强帖 ,点击这里进行查看
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

holmescn

金虫 (正式写手)

[交流] Euler 工程 第三十六题: 已有3人参与

十进制数585是一个回文数,不仅如此,它的二进制表示:585=(1001001001)_2 也是一个回文数。

请找出小于100万的所有在十进制和二进制表示下都是回文数的数,求他们的和。

[ Last edited by holmescn on 2011-7-7 at 20:33 ]
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sudo

木虫 (正式写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-10 15:43:00
PS:上面的程序抄袭了两段著名的代码~可惜判定十进制回文的地方太丑陋了~
9楼2011-07-07 20:11:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 19 个回答

holmescn

金虫 (正式写手)

★ ★ ★ ★
xzhdty(金币+1): 谢谢参与 2011-07-07 22:55:02
余泽成(金币+3, 程序强帖+1): 鼓励交流! 2011-07-11 20:44:16
Python 穷举:
CODE:
# Project Euler Problem 36
#

def checkBinaryReverse(n):
    s = bin(n)[2:]
    r = s[::-1]
    if r == s:
        return True
    return False

# 2-, 3-, 4-digits
for x in xrange(1, 10, 2):
    # 2-digits
    n = int("%d"*2 % (x, x))
    if checkBinaryReverse(n):
        print n, "=>", bin(n)[2:]

    # 3-, 4-digits
    for y in xrange(1, 10):
        # 3-digits
        n = int("%d"*3 % (x, y, x))
        if checkBinaryReverse(n):
            print n, "=>", bin(n)[2:]
        # 4-digits
        n = int("%d"*4 % (x, y, y, x))
        if checkBinaryReverse(n):
            print n, "=>", bin(n)[2:]

        # 5-, 6-digits
        for z in xrange(1, 10):
            # 5-digits
            n = int("%d"*5 % (x, y, z, y, x))
            if checkBinaryReverse(n):
                print n, "=>", bin(n)[2:]
            # 6-digits
            n = int("%d"*6 % (x, y, z, z, y, x))
            if checkBinaryReverse(n):
                print n, "=>", bin(n)[2:]

CODE:
15351 => 11101111110111
33 => 100001
313 => 100111001
32223 => 111110111011111
39993 => 1001110000111001
53235 => 1100111111110011
53835 => 1101001001001011
585 => 1001001001
585585 => 10001110111101110001
717 => 1011001101
73737 => 10010000000001001
7447 => 1110100010111
99 => 1100011

速度太快,就不说了。
2楼2011-07-07 17:13:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-10 15:41:59
余泽成(程序强帖+1): 鼓励交流! 2011-07-11 20:45:09
嗯呢,能穷举的还是简单些的
CODE:
IDLE 2.6.6      
>>> print sum([_x for _x in xrange(1,1000001) if str(_x)==str(_x)[::-1] and str(bin(_x))[2:]==str(bin(_x))[2:][::-1]])
872187
>>>

[ Last edited by libralibra on 2011-7-7 at 17:27 ]
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
3楼2011-07-07 17:25:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)


dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-10 15:42:15
上面那个程序好像少一个9009,又改了一下。
CODE:
# Project Euler Problem 36
#

def checkBinaryReverse(n):
    s = bin(n)[2:]
    r = s[::-1]
    if r == s:
        return True
    return False

# odd digits
for x in xrange(1, 1000):
    n = int(str(x)+str(x)[::-1])
    if checkBinaryReverse(n):
        print n, "=>", bin(n)[2:]

# even digits
for x in xrange(1, 100):
    for y in xrange(10):
        n = int(str(x)+str(y)+str(x)[::-1])
        if checkBinaryReverse(n):
            print n, "=>", bin(n)[2:]

4楼2011-07-07 17:28:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0857调剂 +4 一ll半 2026-02-28 5/250 2026-03-02 02:33 by 908055542
[考研] 欢迎采矿、地质、岩土、计算机、人工智能等专业的同学报考 +3 pin8023 2026-02-28 5/250 2026-03-02 00:24 by 花YOU重开日
[考研] 材料学硕318求调剂 +5 February_Feb 2026-03-01 5/250 2026-03-01 23:31 by L135790
[考研] 292求调剂 +6 yhk_819 2026-02-28 6/300 2026-03-01 23:23 by 向上的胖东
[基金申请] 成果系统访问量大,请一小时后再尝试。---NSFC啥时候好哦,已经两天这样了 +4 NSFC2026我来了 2026-02-28 4/200 2026-03-01 22:37 by 铁门栓
[考研] 275求调剂 +3 明远求学 2026-03-01 3/150 2026-03-01 22:29 by 刘兵
[考研] 274求调剂 +3 cgyzqwn 2026-03-01 6/300 2026-03-01 21:24 by cgyzqwn
[考研] 0805总分292,求调剂 +7 幻想之殇 2026-03-01 7/350 2026-03-01 21:22 by 公瑾逍遥
[考研] 306分材料调剂 +4 chuanzhu川烛 2026-03-01 5/250 2026-03-01 19:48 by 无际的草原
[考研] 0856化工专硕求调剂 +12 董boxing 2026-03-01 12/600 2026-03-01 19:45 by 材子momo
[考研] 材料学调剂 +9 提神豆沙包 2026-02-28 11/550 2026-03-01 18:15 by ms629
[考博] 26申博 +4 想申博! 2026-02-26 6/300 2026-03-01 17:32 by 想申博!
[考研] 321求调剂一志愿东北林业大学材料与化工英二数二 +4 虫虫虫虫虫7 2026-03-01 7/350 2026-03-01 16:52 by caszguilin
[基金申请] 刚录用,没有期刊号,但是在线可看的论文可以放为代表作吗 10+3 arang1 2026-03-01 3/150 2026-03-01 16:43 by babero
[考研] 303求调剂 +4 今夏不夏 2026-03-01 4/200 2026-03-01 14:46 by 嘟嘟小浣熊
[考研] 295复试调剂 +3 简木ChuFront 2026-03-01 3/150 2026-03-01 14:27 by zzxw520th
[考研] 311求调剂 +9 南迦720 2026-02-28 10/500 2026-03-01 10:55 by sunny81
[论文投稿] Optics letters投稿被拒求助 30+3 luckyry 2026-02-26 4/200 2026-03-01 09:06 by babero
[考研] 276求调剂 +3 路lyh123 2026-02-28 4/200 2026-02-28 19:45 by 路lyh123
[硕博家园] 【博士招生】太原理工大学2026化工博士 +4 N1ce_try 2026-02-24 8/400 2026-02-26 08:40 by N1ce_try
信息提示
请填处理意见