2 lines
73 B
Text
2 lines
73 B
Text
|
Select[Permutations[Range[7], {3}], Total[#] == 12 && EvenQ[First[#]] &]
|