Set puzzle: Difference between revisions
Content added Content deleted
m (formatting of task description) |
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: fixed deck creation & display of results) |
||
Line 2,217: | Line 2,217: | ||
enum Style (solid => 0o1, open => 0o2, striped => 0o4); |
enum Style (solid => 0o1, open => 0o2, striped => 0o4); |
||
my @deck |
my @deck = Color.enums X Count.enums X Shape.enums X Style.enums; |
||
sub MAIN($DRAW = 9, $GOAL = $DRAW div 2) { |
sub MAIN($DRAW = 9, $GOAL = $DRAW div 2) { |
||
sub show-cards(@c) { printf " |
sub show-cards(@c) { { printf "%9s%7s%10s%9s\n", @c[$_;*]».key } for ^@c } |
||
my @combinations = [^$DRAW].combinations(3); |
my @combinations = [^$DRAW].combinations(3); |
||
Line 2,242: | Line 2,242: | ||
{{out}} |
{{out}} |
||
<pre>Drew 9 cards: |
<pre>Drew 9 cards: |
||
purple two diamond open |
|||
red two squiggle striped |
|||
purple three squiggle open |
|||
purple two squiggle striped |
|||
red three oval striped |
|||
red one diamond striped |
|||
purple two oval solid |
|||
green three |
green three diamond solid |
||
red two squiggle open |
|||
Set 1: |
Set 1: |
||
purple two diamond open |
|||
purple two squiggle striped |
|||
purple two oval solid |
|||
Set 2: |
Set 2: |
||
purple two diamond open |
|||
red |
red one diamond striped |
||
green three |
green three diamond solid |
||
Set 3: |
Set 3: |
||
red two squiggle striped |
|||
red three oval striped |
|||
red one diamond striped |
|||
Set 4: |
Set 4: |
||
purple three squiggle open |
|||
red three oval striped |
|||
green three diamond solid</pre> |
|||
=={{header|Python}}== |
=={{header|Python}}== |