Product of min and max prime factors: Difference between revisions
Product of min and max prime factors (view source)
Revision as of 15:23, 11 November 2022
, 1 year agoadded Arturo implementation
Thundergnat (talk | contribs) m (Restore my task commentary) |
Drkameleon (talk | contribs) (added Arturo implementation) |
||
Line 460:
9 82 6889 14 85 86 87 22 7921 10
91 46 93 94 95 6 9409 14 33 10</pre>
=={{header|Arturo}}==
<syntaxhighlight lang="arturo">prints " 1" ; special case 1 since the result is normally null
; for the factors of 1
loop 2..100 'i [
f: factors.prime i
prints to :string .format:"5d" mul min f max f
if 0 = i%10 -> print ""
]</syntaxhighlight>
{{out}}
<pre> 1 4 9 4 25 6 49 4 9 10
121 6 169 14 15 4 289 6 361 10
21 22 529 6 25 26 9 14 841 10
961 4 33 34 35 6 1369 38 39 10
1681 14 1849 22 15 46 2209 6 49 10
51 26 2809 6 55 14 57 58 3481 10
3721 62 21 4 65 22 4489 34 69 14
5041 6 5329 74 15 38 77 26 6241 10
9 82 6889 14 85 86 87 22 7921 10
91 46 93 94 95 6 9409 14 33 10</pre>
=={{header|BASIC}}==
| |||