显示1-1个结果(共1个)。
第页1
1, 3, 21, 57, 219, 399, 903, 1533, 2667, 4161, 7077, 17157, 18543, 29127, 32547, 50673, 65919, 74109, 96141, 113799, 114681, 134463, 194691, 227829, 304311, 352317, 383907, 389193, 463071, 516621, 672987, 797349, 863517, 898779, 932799, 1252461, 1353639
评论
除1外,所有项都可以被3整除,但不能被5或9整除。
所有大于3的项都可以被7、19和73中的至少一个整除。
所有条款都是自由的吗?(结束)
MAPLE公司
过滤器:=n->4&^(n^2)-1模(n^3)=0:
选择(过滤器,[1,序列(i,i=3..10^6,6)])#罗伯特·伊斯雷尔2020年8月13日
数学
k=2;Do[p=质数[k];如果[InterQ[(PowerMod[p+1,n^2,n^3]-1)/n^3],打印[{k,p,n}]],{n,120000}]
k=2;Do[p=质数[k];如果[IntegerQ[(PowerMod[p+1,n^2,n^3]-1)/n^3],打印[{k,p,n}]],{n,1000000}](*罗伯特·威尔逊v2007年4月6日*)
加入[{1},选择[Range[3000000],PowerMod[4,#^2,#^3]==1&]](*罗伯特·普莱斯2020年3月31日*)
搜索在0.005秒内完成
|