Minimum primes: Difference between revisions

Content added Content deleted
m (syntax highlighting fixup automation)
(added Arturo)
Line 54: Line 54:
[ 43 101 79 59 67 ]
[ 43 101 79 59 67 ]
</pre>
</pre>
=={{header|Arturo}}==

<syntaxhighlight lang="arturo">lists: [
[ 5 45 23 21 67]
[43 22 78 46 38]
[ 9 98 12 54 53]
]

print map 0..dec size first lists 'i ->
first select.first (max map lists 'l -> l\[i])..∞ => prime?</syntaxhighlight>

{{out}}

<pre>43 101 79 59 67</pre>

=={{header|AWK}}==
=={{header|AWK}}==
<syntaxhighlight lang="awk">
<syntaxhighlight lang="awk">
Line 92: Line 107:
43 101 79 59 67
43 101 79 59 67
</pre>
</pre>



=={{header|BASIC256}}==
=={{header|BASIC256}}==