Semiprime: Difference between revisions
Added Arturo implementation
(BASICs moved to the BASIC section) |
Drkameleon (talk | contribs) (Added Arturo implementation) |
||
Line 256:
semi primes below between 1670 and 1690: 1671 1673 1678 1679 1681 1685 1687 1689
</pre>
=={{header|Arturo}}==
<lang rebol>semiPrime?: function [x][
2 = size factors.prime x
]
print select 1..100 => semiPrime?</lang>
{{out}}
<pre>4 6 9 10 14 15 21 22 25 26 33 34 35 38 39 46 49 51 55 57 58 62 65 69 74 77 82 85 86 87 91 93 94 95</pre>
=={{header|AutoHotkey}}==
| |||