Solve hanging lantern problem: Difference between revisions

Content deleted Content added
Markjreed (talk | contribs)
→‎{{header|Commodore BASIC}}: Add implementation.
Thundergnat (talk | contribs)
→‎{{header|Raku}}: Ena me syntaxes highlighting. The highlighter name is not necessarily the language name.
Line 420:
Rather than take the number of columns as an explicit argument, this program infers the number from the size of the array of columns passed in. Also, the verbose output (optional task) gives the sequence of column numbers from which to take the bottommost lantern at each step, rather than numbering each lantern individually.
 
<lang rakuperl6>unit sub MAIN(*@columns, :v(:$verbose)=False);
 
my @sequences = @columns