22 lines
675 B
Text
22 lines
675 B
Text
go3 =>
|
|
ValidP = [2, 3, 5, 7, 13, 17, 19, 31, 61, 89, 107, 127, 521, 607,
|
|
1279, 2203, 2281, 3217, 4253, 4423, 9689, 9941, 11213,
|
|
19937, 21701, 23209, 44497, 86243, 110503, 132049, 216091,
|
|
|
|
756839, 859433, 1257787, 1398269, 2976221, 3021377, 6972593,
|
|
13466917, 20996011, 24036583, 25964951, 30402457, 32582657,
|
|
37156667, 42643801, 43112609, 57885161],
|
|
foreach(P in ValidP)
|
|
printf("prime %w: ", P),
|
|
PF = perfectf(P),
|
|
Len = PF.to_string.len,
|
|
if Len < 80 then
|
|
println(PF)
|
|
else
|
|
println(len=Len)
|
|
end,
|
|
if Len >= 100_000 then
|
|
fail
|
|
end
|
|
end,
|
|
nl.
|