「足して5のペアを全て表示」の効率の良い書き方

Question

足して5のペアを全て表示するにはどうすればよいでしょうか。
$array = ["a"=>[1,2,3,4],"b"=>[1,2,3,4],"c"=>[1,2,3,4],"d"=>[1,2,3,4]];

なお、配列内の同じ数字は1度しか使えません。
("a"1"b"3), ("a"1,"c"3)　これは"a"1が2回出るのでだめです。

表示例：
(1,4)(2,3)(3,2)(4,1)
(1,4)(2,3)(3,2)(4,1)

よろしくお願いいたします。

■コード

<?php
$array = array("A"=>array(1,2,3,4),
"B"=>array(1,2,3,4),
"C"=>array(1,2,3,4),
"D"=>array(1,2,3,4),
);
shuffle($array); 
for($a=0; $a<4; $a++){
for($b=0; $b<4; $b++){
if((($array[0][$a])+($array[1][$b])) == 5){
echo "(" . $array[0][$a].",".$array[1][$b] .")";
}
}
}echo "<br>"; 
for($c=0; $c<4; $c++){
for($d=0; $d<4; $d++){
if((($array[2][$c])+($array[3][$d])) == 5){
echo "(" . $array[2][$c].",".$array[3][$d] .")";
}
}
} 

■結果：
(1,4)(2,3)(3,2)(4,1)
(1,4)(2,3)(3,2)(4,1)

Comments

[kei344]

ご自身で試されたコードを質問文に追記し、「何」が「どのように」わからないのか、コードのどの部分で詰まっているのかなどを具体的に追記されたほうが回答が望めると思います。

[echoMa_kino]

ありがとうございます！追記しました。

[kei344]

回答ではなく、質問文に、コードブロックで追記してください。コードブロックは ```（バッククオート3つ）で囲み、前後に改行をいれるか、コードを選択して「<code>」ボタンを押すとコードブロックになります。

[echoMa_kino]

ありがとうございます！勉強になりました。

[m.ts10806]

質問編集してください。

[papinianus]

要素は偶数個であり、必ずペアになるものがいる、要素の重複はない、負の数はないといった点を前提にしてよいのでしょうか？

[echoMa_kino]

はい。ご返信ありがとうございます。

Answer 1

PHPなど不要。そう、シェル芸ならね！

echo {0..4}+{0..4}+{0..4}+{0..4}|xargs -n1 -I@ sh -c 'echo $((@)) @'|tr '+' ' '|awk '/^5/&&$0=($2?"a"$2:"")($3?"b"$3:"")($4?"c"$4:"")($5?"d"$5:"")'|sed -E 's/([1234])([bcd])/\1,\2/g'|awk -F, '!$3'|sort
a1,b4
a1,c4
a1,d4
a2,b3
a2,c3
a2,d3
a3,b2
a3,c2
a3,d2
a4,b1
a4,c1
a4,d1
b1,c4
b1,d4
b2,c3
b2,d3
b3,c2
b3,d2
b4,c1
b4,d1
c1,d4
c2,d3
c3,d2
c4,d1

Comments

[nullpon]

回答した後に質問内容が変わっていたので修正しました。

[echoMa_kino]

失礼しました。
シェル芸は使ったことがないので、難しすぎます(´；ω；`)ｳｯ…
ご回答ありがとうございました。

Answer 2

■コード

<?php $array = array("A"=>array(1,2,3,4), "B"=>array(1,2,3,4), "C"=>array(1,2,3,4), "D"=>array(1,2,3,4), ); shuffle($array); for($a=0; $a<4; $a++){ for($b=0; $b<4; $b++){ if((($array[0][$a])+($array[1][$b])) == 5){ echo "(" . $array[0][$a].",".$array[1][$b] .")"; } } }echo "<br>"; for($c=0; $c<4; $c++){ for($d=0; $d<4; $d++){ if((($array[2][$c])+($array[3][$d])) == 5){ echo "(" . $array[2][$c].",".$array[3][$d] .")"; } } } ■結果： (1,4)(2,3)(3,2)(4,1) (1,4)(2,3)(3,2)(4,1)