版塊導(dǎo)航: 正在加載中...

登錄注冊

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進(jìn)行實名認(rèn)證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號能夠正常使用，請盡快對帳號進(jìn)行手機(jī)號驗證，感謝您的理解與支持！

24小時熱門版塊排行榜

北京石油化工學(xué)院2026年研究生招生接收調(diào)劑公告

返回列表

本帖產(chǎn)生 4 個程序強(qiáng)帖，點擊這里進(jìn)行查看

當(dāng)前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖

holmescn

金蟲 (正式寫手)

程序強(qiáng)帖: 37
應(yīng)助: 1 (幼兒園)
金幣: 1918.8
散金: 275
紅花: 1
帖子: 699
在線: 102.6小時
蟲號: 913482
注冊: 2009-11-26
性別: GG
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

[交流] Euler 工程第三十五題：循環(huán)質(zhì)數(shù) 已有4人參與

197 這個質(zhì)數(shù)很特別，因為1, 9, 7這三個數(shù)的循環(huán)排列也是質(zhì)數(shù)。（197，719，971）

100以下有這樣性質(zhì)的質(zhì)數(shù)有13個：2, 3, 5, 7, 11, 13, 17, 31, 37, 71, 73, 79, 97.

那么100百萬以下這樣的數(shù)有多少個呢？

回復(fù)此樓

» 猜你喜歡

342求調(diào)劑已經(jīng)有3人回復(fù)
070300化學(xué)專業(yè)279調(diào)劑已經(jīng)有9人回復(fù)
求調(diào)劑：085600材料與化工，考材科基，總分319 已經(jīng)有20人回復(fù)
一志愿華東理工大學(xué)，080500學(xué)碩，317分，求調(diào)劑已經(jīng)有9人回復(fù)
一志愿a區(qū)211，085601-307分求調(diào)劑已經(jīng)有23人回復(fù)
合肥區(qū)域性重點一本招收調(diào)劑已經(jīng)有8人回復(fù)
材料調(diào)劑已經(jīng)有10人回復(fù)
288求調(diào)劑一志愿哈工大材料與化工已經(jīng)有13人回復(fù)
材料科學(xué)與工程339求調(diào)劑已經(jīng)有3人回復(fù)
化學(xué)308分調(diào)劑已經(jīng)有11人回復(fù)

1樓 2011-07-06 22:04:02

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

libralibra

至尊木蟲 (著名寫手)

驃騎將軍

程序強(qiáng)帖: 40
應(yīng)助: 817 (博后)
金幣: 12914.1
紅花: 64
帖子: 2238
在線: 287.3小時
蟲號: 696514
注冊: 2009-02-05
專業(yè): 計算機(jī)軟件

★ ★ ★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
dubo(金幣+1): 歡迎常來程序語言版討論 2011-07-07 14:43:53
余澤成(金幣+2, 程序強(qiáng)帖+1): 鼓勵交流！ 2011-07-11 20:35:50

c++的效率還是高
不過初學(xué)c++,誰知道還有什么數(shù)字,字符串轉(zhuǎn)換的高效方法嗎?
第二個子函數(shù)中計算rotation number的辦法好丑陋

CODE:

 #include 

using namespace std;

// 素數(shù)篩: 返回0-stop的數(shù)組,素數(shù)位置為1,其余位置為0

// 從第一個非素數(shù)開始,直到大于stop的平方根

// 方法是挨著劃去當(dāng)前數(shù)的倍數(shù)

int *primes(int stop)

{

    int *numlist = new int[stop+1];

    int i;

    for(i=0;i<=stop;++i)

    {

        if(i<2)

            numlist[i] = 0;

        else

            numlist[i] = i;

    }

    i = 2;

    while(i*i<=stop)

    {

        if(numlist[i]>0)

        {

            for(int j=i+1;j<=stop;++j)

                if(numlist[j]%i==0)

                    numlist[j] = 0;

        }

        i++;

    }

    return numlist;

}

// 判斷所有循環(huán)是否都是素數(shù)

bool checkRotation(int n, int *pmlist)

{

    bool flag = true;

    if(n<10) return flag; // 小于10,直接返回true

    char strnum[7] = ""; // <=1,000,000,7位就夠

    sprintf(strnum,"%d",n); // 轉(zhuǎn)為字符串

    int len = strlen(strnum); // 長度

    int curNum,i,j;

    char sNewNum[7] = ""; // 旋轉(zhuǎn)數(shù)的字符串形式

    for(i=1;i
    {

        // 從位置i開始的旋轉(zhuǎn)數(shù)

        for(j=0;j
        {

            if(i+j
                sNewNum[j] = strnum[i+j];

            else

                sNewNum[j] = strnum[i+j-len];

        }

        sscanf(sNewNum,"%d",&curNum); // 轉(zhuǎn)為數(shù)字

        //cout<

        // 判斷是否是素數(shù)

        if(pmlist[curNum]==0)

        {

            flag = false;

            break;

        }

    }

    return flag;

}

// euler35

int main(int args, char* argv[])

{

    int stop = 1000000;

    int i,num = 0;

    int *pmlist = primes(stop);

    for(i=0;i<=stop;++i)

        if(pmlist[i]>0 && checkRotation(i,pmlist))

            num++;

    cout<<"小于 "<
    return 0;

}

結(jié)果

CODE:

 //小于 1000000 滿足條件的數(shù)有: 55 個.

//Process returned 0 (0x0)   execution time : 1.703 s

//Press any key to continue.

贊一下(3人)

回復(fù)此樓

matlab/VB/python/c++/Java寫程序請發(fā)QQ郵件:790404545@qq.com

4樓2011-07-07 03:10:36

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

查看全部 17 個回答

huycwork

金蟲 (著名寫手)

程序強(qiáng)帖: 22
應(yīng)助: 0 (幼兒園)
金幣: 953
散金: 663
紅花: 8
沙發(fā): 13
帖子: 1080
在線: 264.1小時
蟲號: 1257243
注冊: 2011-04-06
專業(yè): 金融學(xué)

★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
dubo(金幣+1): 歡迎常來程序語言版討論 2011-07-07 14:43:38

這個題目帶有強(qiáng)烈的多線程暗示呀~

贊一下(2人)

回復(fù)此樓

漩渦的中心有一塊空地，空空的。

2樓2011-07-06 23:31:27

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

libralibra

至尊木蟲 (著名寫手)

驃騎將軍

程序強(qiáng)帖: 40
應(yīng)助: 817 (博后)
金幣: 12914.1
紅花: 64
帖子: 2238
在線: 287.3小時
蟲號: 696514
注冊: 2009-02-05
專業(yè): 計算機(jī)軟件

★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
dubo(金幣+1): 歡迎常來程序語言版討論 2011-07-07 14:43:45

matlab使用了primes函數(shù)函數(shù)不快哦

CODE:

% Elapsed time is 49.161032 seconds.

% ans =

%     55

function result = euler35()

tic;

pm = primes(1000000);

result = 0;

for i=1:length(pm)

    x = pm(i);

    si = num2str(pm(i));

    for j=2:length(si)

        x(end+1) = str2double([si(j:end),si(1:j-1)]);

    end

    x = unique(x);

    if any(~ismember(x,pm)) % use any() is twice faster than all()

        continue;

    end

    result = result+1;

end

toc;

end

贊一下(2人)

回復(fù)此樓

matlab/VB/python/c++/Java寫程序請發(fā)QQ郵件:790404545@qq.com

3樓2011-07-07 00:11:50

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

holmescn

金蟲 (正式寫手)

程序強(qiáng)帖: 37
應(yīng)助: 1 (幼兒園)
金幣: 1918.8
散金: 275
紅花: 1
帖子: 699
在線: 102.6小時
蟲號: 913482
注冊: 2009-11-26
性別: GG
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

★ ★ ★
dubo(金幣+1): 歡迎常來程序語言版討論 2011-07-07 14:44:00
余澤成(金幣+2, 程序強(qiáng)帖+1): 鼓勵交流！ 2011-07-11 20:36:23

算法好的話，python也不慢

CODE:

# Euler Project Problem 35

#

# Gen a prime list

oneMillion = 1000000

primes = range(2, oneMillion+1);

for x in primes:

    if x > 0:

        for n in xrange(2*x, oneMillion+1, x):

            primes[n-2] = 0

primes = [x for x in primes if x > 0]

primes = set(primes)

# Count

count = 0

for n in primes:

    s = str(n)

    flag = True

    for x in xrange(len(s)):

        s = s[1:] + s[0]

        if int(s) not in primes:

            flag = False

            break

    if flag:

        count += 1

        print n

print "Total", count

引用回帖:

Total 55

real 0m1.244s
user 0m1.200s
sys 0m0.040s

贊一下(2人)

回復(fù)此樓

5樓2011-07-07 09:11:18

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

查看全部 17 個回答

普通表情龍兔虎貓高級回復(fù) (可上傳附件)

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 085600，321分求調(diào)劑 +7	大饞小子 2026-03-31	7/350	2026-03-31 18:02 by 無際的草原
[考研] 271求調(diào)劑 +5	勒布朗@ 2026-03-31	7/350	2026-03-31 16:26 by hypershenger
[考研] 334分一志愿武理-080500 材料求調(diào)劑 +9	李李不服輸 2026-03-25	9/450	2026-03-31 16:25 by hypershenger
[考研] 化學(xué)工程085602 305分求調(diào)劑 +28	RichLi_ 2026-03-25	36/1800	2026-03-31 14:56 by JourneyLucky
[考研] 一志愿211，335分，0856，求調(diào)劑院校和導(dǎo)師 +10	傾____蕭 2026-03-27	11/550	2026-03-31 14:32 by fmesaito
[考研] 085600材料與化工調(diào)劑 +16	kikiki7 2026-03-30	16/800	2026-03-31 10:03 by 氯化亞硝酰
[考研] 0817化工學(xué)碩調(diào)劑 +7	努力上岸中！ 2026-03-31	7/350	2026-03-31 09:58 by nalakaiqi
[考研] 吉大生物學(xué)326分求調(diào)劑 +3	sunnyupup 2026-03-31	3/150	2026-03-31 09:28 by longlotian
[考研] 335求調(diào)劑 +3	321* 2026-03-31	3/150	2026-03-31 09:00 by 功夫瘋狂
[考研] 0703一志愿9，初試成績：338，四六級已過，有科研經(jīng)歷，求調(diào)劑！ +7	Zuhui0306 2026-03-25	7/350	2026-03-30 19:01 by 源_2020
[考研] 材料專碩 085600求調(diào)劑 +7	BBQ233 2026-03-30	7/350	2026-03-30 17:44 by oooqiao
[考研] 332求調(diào)劑 +6	Lyy930824@ 2026-03-29	6/300	2026-03-30 10:53 by 1172367218
[考研] 求調(diào)劑，一志愿南京航空航天大學(xué)大學(xué) ，080500材料科學(xué)與工程學(xué)碩 +6	@taotao 2026-03-26	7/350	2026-03-30 10:43 by 我是小康
[考研] 11408軟件工程求調(diào)劑 +3	Qiu學(xué)ing 2026-03-28	3/150	2026-03-28 21:50 by zhq0425
[考研] 一志愿廈門大學(xué)化學(xué)學(xué)碩307求調(diào)劑 +10	y7czhao 2026-03-26	10/500	2026-03-28 14:23 by 唐沐兒
[考研] 265求調(diào)劑 +8	小木蟲085600 2026-03-27	8/400	2026-03-27 22:16 by 無際的草原
[考研] 08開頭275求調(diào)劑 +4	拉誰不重要 2026-03-26	4/200	2026-03-27 14:12 by Delta2012
[考研] 調(diào)劑求收留 +7	果然有我 2026-03-26	7/350	2026-03-27 00:26 by wxiongid
[考研] 085601求調(diào)劑總分293英一數(shù)二 +4	鋼鐵大炮 2026-03-24	4/200	2026-03-26 16:28 by dick_runner
[考研] 材料與化工304求B區(qū)調(diào)劑 +3	邱gl 2026-03-25	3/150	2026-03-25 19:03 by Ainin_

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产 高清 中文字幕,99re热久久亚洲综合精品成人,熟妇 一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

24小時熱門版塊排行榜

holmescn

[交流] Euler 工程 第三十五題：循環(huán)質(zhì)數(shù) 已有4人參與

» 猜你喜歡

libralibra

huycwork

libralibra

holmescn

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产高清中文字幕,99re热久久亚洲综合精品成人,熟妇一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

[交流] Euler 工程第三十五題：循環(huán)質(zhì)數(shù) 已有4人參與