Aliquot sequence classifications: Difference between revisions
m
→{{header|Phix}}: minor tidy
m (→{{header|AppleScript}}: Minor improvements to handlers.) |
m (→{{header|Phix}}: minor tidy) |
||
Line 2,608:
end while
return {"non-terminating",s}
end function
Line 2,618 ⟶ 2,613:
for i=1 to length(n) do
{string classification, sequence dseq} = aliquot(n[i])
dseq = join(apply(true,sprintf,{{"%d"},dseq}),",")
printf(1,"%14d => %15s, {%s}\n",{n[i],classification,
end for</lang>
{{out}}
|