Numbers whose count of divisors is prime: Difference between revisions
Content added Content deleted
m (changed a sentence.) |
m (→{{header|REXX}}: added stretch goal output.) |
||
Line 9: | Line 9: | ||
=={{header|REXX}}== |
=={{header|REXX}}== |
||
Some optimization was added so as to bypass finding divisors for primes. |
|||
<lang rexx>/*REXX pgm finds positive integers N whose count of divisors is prime, where N < 1000.*/ |
<lang rexx>/*REXX pgm finds positive integers N whose count of divisors is prime, where N < 1000.*/ |
||
parse arg hi cols . /*obtain optional arguments from the CL*/ |
parse arg hi cols . /*obtain optional arguments from the CL*/ |
||
Line 70: | Line 71: | ||
Found 16 positive integers N whose number of divisors is prime, where N < 1,000 |
Found 16 positive integers N whose number of divisors is prime, where N < 1,000 |
||
</pre> |
</pre> |
||
{{out|output|text= when using the input of: <tt> 100000 </tt>}} |
|||
<pre> |
|||
index │ positive integers N whose number of divisors is prime, where N < 100,000 |
|||
───────┼─────────────────────────────────────────────────────────────────────────────────────────────────────────────── |
|||
1 │ 4 9 16 25 49 64 81 121 169 289 |
|||
11 │ 361 529 625 729 841 961 1,024 1,369 1,681 1,849 |
|||
21 │ 2,209 2,401 2,809 3,481 3,721 4,096 4,489 5,041 5,329 6,241 |
|||
31 │ 6,889 7,921 9,409 10,201 10,609 11,449 11,881 12,769 14,641 15,625 |
|||
41 │ 16,129 17,161 18,769 19,321 22,201 22,801 24,649 26,569 27,889 28,561 |
|||
51 │ 29,929 32,041 32,761 36,481 37,249 38,809 39,601 44,521 49,729 51,529 |
|||
61 │ 52,441 54,289 57,121 58,081 59,049 63,001 65,536 66,049 69,169 72,361 |
|||
71 │ 73,441 76,729 78,961 80,089 83,521 85,849 94,249 96,721 97,969 |
|||
───────┴─────────────────────────────────────────────────────────────────────────────────────────────────────────────── |
|||
Found 79 positive integers N whose number of divisors is prime, where N < 100,000 |
|||
=={{header|Ring}}== |
=={{header|Ring}}== |