| 查看: 2222 | 回復(fù): 18 | ||
無名化雪金蟲 (小有名氣)
|
[求助]
一個簡單的數(shù)學(xué)與編程問題
|
|
是否存在n*10+1,n*10+3,n*10+5,n*10+7,n*10+9都是合數(shù)的。如果有是否有什么規(guī)律,能否用編程來實(shí)現(xiàn),例如Matlab或者是C語言。![]() |

|
這樣的n是存在的, 比如: n=20, 對應(yīng)的 10*n+1=201=67*3, 10*n+3=203=29*7, 10*n+5=205=41*5, 10*n+7=207=23*9, 10*n+9=209=19*11. 還有n=32,51,53,62. 我用Maple編寫了一個小函數(shù)Areallprime1() 如下: Areallprime1:=proc(i,j) local k,n,a,b: for n from i to j do a:=array(1..5): b:=array(1..5): for k from 1 to 5 do b[k]:=10*n+(2*k-1): a[k]:=isprime(10*n+(2*k-1)): end do: print(n,b,a); end do: end proc; 舉個例子, 當(dāng)我們在maple 中輸入命令: Areallprime1(50,60); 那么就會輸出結(jié)果為: 50, [501, 503, 505, 507, 509], [false, true, false, false, true] 51, [511, 513, 515, 517, 519], [false, false, false, false, false] 52, [521, 523, 525, 527, 529], [true, true, false, false, false] 53, [531, 533, 535, 537, 539], [false, false, false, false, false] 54, [541, 543, 545, 547, 549], [true, false, false, true, false] 55, [551, 553, 555, 557, 559], [false, false, false, true, false] 56, [561, 563, 565, 567, 569], [false, true, false, false, true] 57, [571, 573, 575, 577, 579], [true, false, false, true, false] 58, [581, 583, 585, 587, 589], [false, false, false, true, false] 59, [591, 593, 595, 597, 599], [false, true, false, false, true] 60, [601, 603, 605, 607, 609], [true, false, false, true, false] 這個數(shù)據(jù)表的第一列是 n 的值, 第二列是 n 對應(yīng)的5個數(shù), 第三列是這5個數(shù)是否為素?cái)?shù). 注意在數(shù)據(jù)表的第三列中只要出現(xiàn)[false, false, false, false, false] 那么這組數(shù)據(jù)對應(yīng)行中第一個位置就是全為合數(shù)的對應(yīng)的n的值, 而第二個位置就是n所對應(yīng)的這組合數(shù). 這樣當(dāng)n=51,53 時, 對應(yīng)的數(shù)都是合數(shù). 至于規(guī)律, 我只驗(yàn)證了n 從1到100的情況, 你還可以驗(yàn)證更大的一些數(shù). 或許能發(fā)現(xiàn)一點(diǎn)規(guī)律, 把這些n值用曲線擬合一下, 看看圖像有什么特點(diǎn). 呵呵, 函數(shù)寫得不太理想, 貽笑大方了. ![]() ![]() ![]() ![]() |

|
改了一下函數(shù), 更合理了. 可以列出1~m的滿足條件的所有的n > Areallprime:=proc(m) > local k,n,a,b,c: > for n from 1 to m do > a:=array(1..5): > b:=array(1..5): > for k from 1 to 5 do > a[k]:=isprime(10*n+(2*k-1)): > b[k]:=10*n+(2*k-1): > end do: > if(a[1]=false and a[2]=false and a[3]=false and a[4]=false and a[5]=false) then print(n,b); > end if: > end do: > end proc: > Areallprime(100); 20, [201, 203, 205, 207, 209] 32, [321, 323, 325, 327, 329] 51, [511, 513, 515, 517, 519] 53, [531, 533, 535, 537, 539] 62, [621, 623, 625, 627, 629] 84, [841, 843, 845, 847, 849] 89, [891, 893, 895, 897, 899] |



|
金蟲 (小有名氣)

金蟲 (小有名氣)

木蟲 (初入文壇)
木蟲 (初入文壇)
木蟲 (正式寫手)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料學(xué)碩318求調(diào)劑 +5 | February_Feb 2026-03-19 | 5/250 |
|
|---|---|---|---|---|
|
[考研] 0817 化學(xué)工程 299分求調(diào)劑 有科研經(jīng)歷 有二區(qū)文章 +18 | rare12345 2026-03-18 | 18/900 |
|
|
[考研] 296求調(diào)劑 +3 | www_q 2026-03-18 | 6/300 |
|
|
[考研] 招收調(diào)劑碩士 +4 | lidianxing 2026-03-19 | 10/500 |
|
|
[考研] 一志愿北京化工大學(xué)0703化學(xué)318分,有科研經(jīng)歷,求調(diào)劑 +3 | 一瓶苯甲酸 2026-03-14 | 3/150 |
|
|
[考研] 一志愿西安交通大學(xué)材料工程專業(yè) 282分求調(diào)劑 +5 | 楓橋ZL 2026-03-18 | 7/350 |
|
|
[考研] 0703化學(xué)調(diào)劑 +5 | pupcoco 2026-03-17 | 8/400 |
|
|
[考研] 287求調(diào)劑 +3 | 晨昏線與星海 2026-03-19 | 4/200 |
|
|
[教師之家] 焦慮 +9 | 水冰月月野兔 2026-03-13 | 13/650 |
|
|
[考研] 一志愿西南交大,求調(diào)劑 +4 | 材化逐夢人 2026-03-18 | 4/200 |
|
|
[考博] 環(huán)境領(lǐng)域全國重點(diǎn)實(shí)驗(yàn)室招收博士1-2名 +3 | QGZDSYS 2026-03-13 | 5/250 |
|
|
[考研] 334求調(diào)劑 +3 | 志存高遠(yuǎn)意在機(jī)?/a> 2026-03-16 | 3/150 |
|
|
[考博] 26博士申請 +3 | 1042136743 2026-03-17 | 3/150 |
|
|
[基金申請] 被我言中:新模板不強(qiáng)調(diào)格式了,假專家開始管格式了 +4 | beefly 2026-03-14 | 4/200 |
|
|
[考研] 283求調(diào)劑 +3 | 聽風(fēng)就是雨; 2026-03-16 | 3/150 |
|
|
[考研] 東南大學(xué)364求調(diào)劑 +5 | JasonYuiui 2026-03-15 | 5/250 |
|
|
[考研] 326求調(diào)劑 +3 | mlpqaz03 2026-03-15 | 3/150 |
|
|
[考研] 本科南京大學(xué)一志愿川大藥學(xué)327 +3 | 麥田耕者 2026-03-14 | 3/150 |
|
|
[考研] 招收0805(材料)調(diào)劑 +3 | 18595523086 2026-03-13 | 3/150 |
|
|
[考研] 304求調(diào)劑 +7 | 7712b 2026-03-13 | 7/350 |
|