Proper divisors: Difference between revisions
Content added Content deleted
ReeceGoding (talk | contribs) m (→Filter solution: Clarification) |
(Added Wren) |
||
Line 5,306: | Line 5,306: | ||
10: {1, 2, 5} |
10: {1, 2, 5} |
||
15120: 79</pre> |
15120: 79</pre> |
||
=={{header|Wren}}== |
|||
{{libheader|Wren-fmt}} |
|||
{{libheader|Wren-math}} |
|||
<lang ecmascript>import "/fmt" for Fmt |
|||
import "/math" for Int |
|||
for (i in 1..10) System.print("%(Fmt.d(2, i)) -> %(Int.properDivisors(i))") |
|||
System.print("\nThe number in the range [1, 20000] with the most proper divisors is:") |
|||
var number = 1 |
|||
var maxDivs = 0 |
|||
for (i in 2..20000) { |
|||
var divs = Int.properDivisors(i).count |
|||
if (divs > maxDivs) { |
|||
number = i |
|||
maxDivs = divs |
|||
} |
|||
} |
|||
System.print("%(number) which has %(maxDivs) proper divisors.")</lang> |
|||
{{out}} |
|||
<pre> |
|||
1 -> [] |
|||
2 -> [1] |
|||
3 -> [1] |
|||
4 -> [1, 2] |
|||
5 -> [1] |
|||
6 -> [1, 2, 3] |
|||
7 -> [1] |
|||
8 -> [1, 2, 4] |
|||
9 -> [1, 3] |
|||
10 -> [1, 2, 5] |
|||
The number in the range [1, 20000] with the most proper divisors is: |
|||
15120 which has 79 proper divisors. |
|||
</pre> |
|||
=={{header|zkl}}== |
=={{header|zkl}}== |