Factorions: Difference between revisions
m
→{{header|Phix}}
m (→{{header|Phix}}: minor performance improvement) |
|||
Line 336:
for i=1 to 1499999 do
atom total = 0, j = i, d
while j>0 and total<=i do
d = remainder(j,b)
total += fact[d+1]
|