24小时热门版块排行榜    

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

wangww2011

木虫 (著名写手)


[交流] Project Euler 49 欧拉工程 49 题

以3330为公差的等差数列1487, 4817, 8147在两个方面比较特殊:
(1)每一项都是四位数的素数
(2)任一项都可以通过其他项再排列得到

已知没有一位,两位或者三位数的三个素数能够展现出上述性质,但是还有一个由4位素数组成的数列满足上述性质。

请问把这个数列中的三个数依次连接组成的12位的数字是多少?
回复此楼

» 猜你喜欢

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

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

tieer

木虫 (正式写手)


引用回帖:
3楼: Originally posted by wangww2011 at 2011-09-09 12:05:16:
结果
CODE:
['148748178147', '296962999629']

代码
[code]
#!/usr/bin/env python

def generatePrimes(n):#generate all prime numbers less than a given integer n, just take 0.6 seconds  ...

那公差不是题目要求的吗?
4楼2011-09-09 15:46:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

tieer

木虫 (正式写手)


★ ★ ★
wangww2011(金币+1):谢谢参与
xzhdty(金币+2): 欢迎讨论交流 2011-09-09 17:18:09
余泽成(程序强帖+1): 鼓励交流,欢迎常来程序语言版! 2011-09-09 23:20:12
python
CODE:
# -*- coding: cp936 -*-
#Project Euler 49 欧拉工程 49 题
#等差3330数列
#(1)每一项都是四位数的素数
#(2)任一项都可以通过其他项再排列得到
#由4位素数组成的三个数
from math import sqrt
def isprime(p):             #验证素数,素数则返回素数本身,合数则返回False
    k=1
    for i in xrange(2,int(sqrt(p))+1):
        if p%i==0:
            k=0
            return False
            break
    if k:
        return p
for x in xrange(1001,3338):   #9999-6660=3339,x为三个数中最小的,不大于此
    if isprime(x) and isprime(x+3330) and isprime(x+6660) and set(str(x))==set(str(x+3330))==set(str(x+6660)):
        print x,x+3330,x+6660

CODE:
1487 4817 8147
2969 6299 9629

[ Last edited by tieer on 2011-9-9 at 11:41 ]
2楼2011-09-09 11:35:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangww2011

木虫 (著名写手)


★ ★ ★
余泽成(金币+3, 程序强帖+1): 鼓励交流! 2011-09-09 23:19:44
ben_ladeng: 2011-09-10 09:04:56
结果
CODE:
['148748178147', '296962999629']

代码
CODE:
#!/usr/bin/env python

def generatePrimes(n):#generate all prime numbers less than a given integer n, just take 0.6 seconds for the case n equals one million
    isprimes=[True]*n
    for i in range(2,n):
        if isprimes[i]:
            for j in range(2*i,n,i):
                isprimes[j] = False
    primes=[i for i in range(3,n,2) if isprimes[i]]
    primes.insert(0,2)
    return primes


def euler49():
    p1=generatePrimes(10000)
    p2=[i for i in p1 if i>1000]   
   
    res=[]
    for i in p2:
        for j in p2:
            if j>i and set(str(i))==set(str(j)):
                k=2*j-i
                if set(str(k))==set(str(i)) and k in p2:
                    res.append(''.join([str(i),str(j),str(k)]))

    return res


if __name__ == "__main__":
    print euler49()

PS:楼上怎么知道公差是3330呢?
3楼2011-09-09 12:05:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tieer

木虫 (正式写手)


引用回帖:
3楼: Originally posted by wangww2011 at 2011-09-09 12:05:16:
结果
CODE:
['148748178147', '296962999629']

代码
[code]
#!/usr/bin/env python

def generatePrimes(n):#generate all prime numbers less than a given integer n, just take 0.6 seconds  ...

加层公差的循环,还是只有这一个答案,呵呵,看来我是运气
5楼2011-09-09 16:36:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 2rKfVQg2jQww 2026-11-06 13/650 2026-11-09 03:03 by l48hFd8Nwae2
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 5sJFDKp2kwuI 2026-11-06 12/600 2026-11-09 02:52 by l48hFd8Nwae2
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 5sJFDKp2kwuI 2026-11-06 11/550 2026-11-09 02:48 by l48hFd8Nwae2
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 5sJFDKp2kwuI 2026-11-06 11/550 2026-11-09 02:41 by l48hFd8Nwae2
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 5sJFDKp2kwuI 2026-11-06 9/450 2026-11-08 21:29 by l48hFd8Nwae2
[教师之家] 延安大学回应“副教授留绝笔信”:确已离世,正核实举报内容 +3 yexuqing 2026-11-04 5/250 2026-11-07 13:22 by 苏东坡二世
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +10 ncTVBM6AOJHF 2026-11-04 22/1100 2026-11-06 17:18 by 5sJFDKp2kwuI
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 ELBZ6WwEaRj6 2026-11-05 7/350 2026-11-06 16:43 by 5sJFDKp2kwuI
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +6 ELBZ6WwEaRj6 2026-11-04 11/550 2026-11-06 16:32 by 5sJFDKp2kwuI
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +6 ELBZ6WwEaRj6 2026-11-04 14/700 2026-11-06 16:32 by 5sJFDKp2kwuI
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +7 ncTVBM6AOJHF 2026-11-04 17/850 2026-11-06 13:47 by BkA9Bi5cMhkD
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +8 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-06 13:47 by BkA9Bi5cMhkD
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +8 ncTVBM6AOJHF 2026-11-04 18/900 2026-11-06 13:36 by BkA9Bi5cMhkD
[考研] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 ttH3f1oA6ace 2026-11-04 14/700 2026-11-06 05:11 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 kvewwGtKktqB 2026-11-04 11/550 2026-11-06 05:10 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ttH3f1oA6ace 2026-11-04 9/450 2026-11-06 02:02 by qL1cU46YIdK0
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-06 01:42 by qL1cU46YIdK0
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-05 11:10 by PYZmcHr5kSaq
信息提示
请填处理意见