請大家看看我這mathematica程序哪里出錯(cuò)了
請大家看看我這mathematica程序哪里出錯(cuò)了
Mersenne[n_Integer]:=
Module[
{M,i,u=4},
If[!Prime Q[n],False,
M=2^n-1;
For[i=1,i
Mersenne[n_Integer]:=
Module[
{M,i,u=4},
If[!Prime Q[n],False,
M=2^n-1;
For[i=1,i
其他人氣：303 ℃時(shí)間：2020-05-22 19:29:50
優(yōu)質(zhì)解答
Mersenne[n_Integer] :=Module[{M, i, u = 4}, If[! PrimeQ[n], False, M = 2^n - 1; For[i = 1, i < n - 1, i++, u = Mod[u^2 - 2, M]];If[u == 0, Print[True], Print[False]]]]Do[Mersenne[n], {n, 2, 30...
我來回答
類似推薦
猜你喜歡
- 1氧化鐵還原成四氧化三鐵,為什么是還原反應(yīng)
- 22010至2011六年級下冊數(shù)學(xué)期中試卷蘇教版
- 3開卷有益的名人讀書故事
- 4函數(shù)圖象關(guān)于點(diǎn)M(a,0)和點(diǎn)N(b,0)對稱,則函數(shù)y=f(x)是周期函數(shù)嗎
- 5過濾除菌操作時(shí),將菌液注入濾器過濾,時(shí)間不宜過長,壓力控制在多少為宜?
- 6“5、5、5、1”四個(gè)數(shù)字,利用加減乘除括號,計(jì)算出24
- 7鄭人買履80字感想 急
- 8兩道數(shù)學(xué)必修5等差數(shù)列的題
- 9先化簡,再求值:(X的平方-4x+4/x+8-2-x/1)÷x的平方-2x/x+3 其中x的平方-4=0
- 10在標(biāo)況下,如果1.6L氧氣含n個(gè)氧分子,則阿伏加德羅常數(shù)的數(shù)值為?
- 11已知數(shù)列an的通項(xiàng)公式an=1/(4n²-1),若數(shù)列an的前n項(xiàng)和Sn=7/15則n為多少
- 12如果三點(diǎn)A（a,2）、B（5,1）、C（-4,2a）在同一條直線上,求常數(shù)a的值.怎么做啊