McNuggets problem: Difference between revisions

m
m (→‎{{header|Perl 6}}: Style tweaks)
Line 685:
for 0..$a -> $b {
for 0..$b -> $c {
($a, $b, $c).permutations.map: { @meals[ sum $_ Z* @counts ] = True }
for ($_ Z* @counts).rotor(3) {
@meals[ .sum ] = True
}
}
}
}
10,333

edits