McNuggets problem: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add VTL-2) |
m (→{{header|ALGOL 68}}: Use the simplification in the BASIC, Comal, Draco, Dyalect etc. samples where the loop counters do the additions) |
||
Line 112: | Line 112: | ||
FOR i FROM LWB sum TO UPB sum DO sum[ i ] := FALSE OD; |
FOR i FROM LWB sum TO UPB sum DO sum[ i ] := FALSE OD; |
||
FOR x FROM 0 BY 6 TO max nuggets DO |
FOR x FROM 0 BY 6 TO max nuggets DO |
||
FOR y FROM |
FOR y FROM x BY 9 TO max nuggets DO |
||
FOR z FROM |
FOR z FROM y BY 20 TO max nuggets DO |
||
sum[ z ] := TRUE |
|||
IF nuggets <= max nuggets THEN sum[ nuggets ] := TRUE FI |
|||
OD # z # |
OD # z # |
||
OD # y # |
OD # y # |