McNuggets problem: Difference between revisions

Content added Content deleted
(Add Comal)
(Added Arturo implementation)
Line 321: Line 321:
{{Out}}
{{Out}}
<pre>43</pre>
<pre>43</pre>

=={{header|Arturo}}==

<lang rebol>nonMcNuggets: function [lim][
result: new 0..lim

loop range.step:6 1 lim 'x [
loop range.step:9 1 lim 'y [
loop range.step:20 1 lim 'z
-> 'result -- sum @[x y z]
]
]

return result
]

print max nonMcNuggets 100</lang>

{{out}}

<pre>46</pre>


=={{header|AWK}}==
=={{header|AWK}}==