just use code
cls
$PairA = 1,2,4,12,16,17 #top numbers
$PairN = 22,34,45,33,11 #low numbers
$PairNb = 40,37,10,6 #over due numbers
foreach ($A in $PairA) {
foreach ($N in $PairN) {
foreach ($Nb in $PairNb) {
if($A -ne $N -and $A -ne $Nb -and $N -ne $A -and $N -ne $Nb -and $Nb -ne $A-and $Nb -ne $N){
"$A,$N,$Nb" | ForEach-Object {($_.Split(",") | foreach {[int]$_ }| sort )-join(",") }
}}}}
output
1,22,40
1,22,37
1,10,22
1,6,22
1,34,40
1,34,37
1,10,34
1,6,34
1,40,45
1,37,45
1,10,45
1,6,45
1,33,40
1,33,37
1,10,33
1,6,33
1,11,40
1,11,37
1,10,11
1,6,11
2,22,40
2,22,37
2,10,22
2,6,22
2,34,40
2,34,37
2,10,34
2,6,34
2,40,45
2,37,45
2,10,45
2,6,45
2,33,40
2,33,37
2,10,33
2,6,33
2,11,40
2,11,37
2,10,11
2,6,11
4,22,40
4,22,37
4,10,22
4,6,22
4,34,40
4,34,37
4,10,34
4,6,34
4,40,45
4,37,45
4,10,45
4,6,45
4,33,40
4,33,37
4,10,33
4,6,33
4,11,40
4,11,37
4,10,11
4,6,11
12,22,40
12,22,37
10,12,22
6,12,22
12,34,40
12,34,37
10,12,34
6,12,34
12,40,45
12,37,45
10,12,45
6,12,45
12,33,40
12,33,37
10,12,33
6,12,33
11,12,40
11,12,37
10,11,12
6,11,12
16,22,40
16,22,37
10,16,22
6,16,22
16,34,40
16,34,37
10,16,34
6,16,34
16,40,45
16,37,45
10,16,45
6,16,45
16,33,40
16,33,37
10,16,33
6,16,33
11,16,40
11,16,37
10,11,16
6,11,16
17,22,40
17,22,37
10,17,22
6,17,22
17,34,40
17,34,37
10,17,34
6,17,34
17,40,45
17,37,45
10,17,45
6,17,45
17,33,40
17,33,37
10,17,33
6,17,33
11,17,40
11,17,37
10,11,17
6,11,17