McNuggets problem: Difference between revisions

no edit summary
(Added Dyalect programming language)
No edit summary
Line 1,150:
hits = arrs.pop.product(*arrs).map(&:sum)
p ((0..limit).to_a - hits).max # => 43</lang>
 
=={{header|Tailspin}}==
<lang tailspin>
templates largestNonMcNuggetNumber
@: { largest: 0, mcNuggetNumbers: [1..$it+20 -> 0] };
@.mcNuggetNumbers([6,9,20]): 1..3 -> 1;
1..$it -> #
$@.largest !
<?($@.mcNuggetNumbers($it) <0>)> @.largest: $it;
<> @.mcNuggetNumbers([$it + 6, $it + 9, $it + 20]): 1..3 -> 1;
end largestNonMcNuggetNumber
 
100 -> largestNonMcNuggetNumber -> !OUT::write
</lang>
{{out}}
<pre>
43
</pre>
 
=={{header|zkl}}==
Anonymous user