Minimum primes: Difference between revisions
Added Quackery.
(→J: add) |
(Added Quackery.) |
||
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
[ behead
swap witheach max
[ dup isprime not while
1+ again ]
join ]
echo</syntaxhighlight>
{{out}}
<pre>[ 43 101 79 59 67 ]</pre>
=={{header|Raku}}==
| |||