Amicable pairs: Difference between revisions
Content deleted Content added
m Julia version 1.0+ update |
|||
Line 2,364: | Line 2,364: | ||
'''Functions''' |
'''Functions''' |
||
<lang Julia>using |
<lang Julia>using Primes, Printf |
||
function pcontrib(p::Int64, a::Int64) |
|||
n = one(p) |
n = one(p) |
||
pcon = one(p) |
pcon = one(p) |
||
Line 2,376: | Line 2,376: | ||
end |
end |
||
function divisorsum(n::Int64) |
|||
dsum = one(n) |
dsum = one(n) |
||
for (p, a) in factor(n) |
for (p, a) in factor(n) |