Anonymous user
Abundant odd numbers: Difference between revisions
→{{header|Smalltalk}}
Line 4,644:
divs := Set with:1.
"no need to check even factors; we are only looking for odd nrs"
3 to:(nr integerSqrt) by:2 do:[:d | nr % d = 0 ifTrue:[divs add:d; add:(nr / d)]].
divs.
].
| |||