Factorions: Difference between revisions

Content deleted Content added
Petelomax (talk | contribs)
m →‎{{header|Phix}}: minor performance improvement
Line 336: Line 336:
for i=1 to 1499999 do
for i=1 to 1499999 do
atom total = 0, j = i, d
atom total = 0, j = i, d
while j>0 do
while j>0 and total<i do
d = remainder(j,b)
d = remainder(j,b)
total += fact[d+1]
total += fact[d+1]