Minimum primes: Difference between revisions
m
→{{header|Wren}}: Changed to Wren S/H
(→J: add) |
m (→{{header|Wren}}: Changed to Wren S/H) |
||
| (2 intermediate revisions by one other user not shown) | |||
Line 538:
{43,101,79,59,67}
</pre>
=={{header|Quackery}}==
<code>transpose</code> is defined at [[Matrix transposition#Quackery]].
<code>isprime</code> is defined at [[Primality by trial division#Quackery]].
<syntaxhighlight lang="Quackery"> ' [ 5 45 23 21 67 ]
' [ 43 22 78 46 38 ]
' [ 9 98 12 54 53 ]
3 pack transpose
[] swap witheach
[ unpack max max 1 -
[ 1+ dup isprime until ]
join ]
echo
</syntaxhighlight>
{{out}}
<pre>[ 43 101 79 59 67 ]</pre>
=={{header|Raku}}==
Line 678 ⟶ 699:
=={{header|Wren}}==
{{libheader|Wren-math}}
<syntaxhighlight lang="
var numbers1 = [ 5, 45, 23, 21, 67]
| |||