McNuggets problem: Difference between revisions
→{{header|Picat}}
Drkameleon (talk | contribs) |
|||
Line 1,418:
Maximum non-Mcnugget number using {3,6,15} is: No maximum
</pre>
=={{header|Picat}}==
Using constraint modelling (cp solver).
<lang Picat>import cp.
go =>
N :: 0..100,
foreach(X in 0..16, Y in 0..11, Z in 0..5)
6*X + 9*Y + 20*Z #!= N
end,
solve($[max(N)],N),
println(n=N).</lang>
Output:
<pre>n = 43</pre>
=={{header|PicoLisp}}==
| |||