Sort primes from list to a list: Difference between revisions
Content added Content deleted
(Added Sidef) |
Alpha bravo (talk | contribs) (Added AutoHotkey) |
||
Line 36: | Line 36: | ||
are: 2 7 13 43 103 |
are: 2 7 13 43 103 |
||
</pre> |
</pre> |
||
=={{header|AutoHotkey}}== |
|||
<lang AutoHotkey>Primes := [2,43,81,122,63,13,7,95,103] |
|||
t := [], result := [] |
|||
for i, n in Primes |
|||
if isPrime(n) |
|||
t[n, i] := true |
|||
for n, obj in t |
|||
for i, v in obj |
|||
result.push(n) |
|||
isPrime(n){ |
|||
Loop, % floor(sqrt(n)) |
|||
v := A_Index = 1 ? n : mod(n,A_Index) ? v : v "," A_Index "," n//A_Index |
|||
Return (v = n) |
|||
}</lang> |
|||
{{out}} |
|||
<pre>[2, 7, 13, 43, 103]</pre> |
|||
=={{header|AWK}}== |
=={{header|AWK}}== |
||
<lang AWK> |
<lang AWK> |