McNuggets problem: Difference between revisions
Add BCPL
Not a robot (talk | contribs) (Add BCPL) |
|||
Line 298:
43
</pre>
=={{header|BCPL}}==
<lang bcpl>get "libhdr"
manifest $( limit = 100 $)
let start() be
$( let flags = vec limit
for i = 0 to limit do flags!i := false
for a = 0 to limit by 6
for b = a to limit by 9
for c = b to limit by 20
do flags!c := true
for i = limit to 0 by -1
unless flags!i
$( writef("Maximum non-McNuggets number: %N.*N", i)
finish
$)
$)</lang>
{{out}}
<pre>Maximum non-McNuggets number: 43.</pre>
=={{header|C}}==
| |||