บทนำ

เครื่องคิดเลขของฉันมีพฤติกรรมแปลก ๆ บางครั้งเมื่อฉันพิมพ์ในจะแสดง8 2และบางครั้งเมื่อฉันพิมพ์ในจะแสดง6 +ปุ่มบางปุ่มผสมกัน!
ใครสามารถช่วยฉันพิจารณาว่าอันไหน

ท้าทาย:

อินพุต:รายการสมการที่ไม่ถูกต้องพร้อมผลลัพธ์ที่ถูกต้อง

เอาท์พุท:สองปุ่มที่สลับ

ตัวอย่างเช่น:
อินพุตอาจเป็น:

123    = 3
8423   = 252
4+4    = 8
4*7-10 = 417
9/3    = 3
42-9   = -36

ซึ่งผลที่คาดว่าจะเป็น: และ2*

ทำไม? เนื่องจากสมการทั้งหมดจะถูกต้องหากเราสลับ 2 และ * ของ:

1*3    = 3
84*3   = 252
4+4    = 8
427-10 = 417
9/3    = 3
4*-9   = -36

กฏท้าทาย:

• อินพุตอาจอยู่ในรูปแบบที่สมเหตุสมผล สามารถเป็นสตริงเดียวที่มีช่องว่างคั่น; รายการสตริงหรือ -array; รายการที่มีสมการและรายการอื่นที่มีผลลัพธ์ที่ถูกต้อง การโทรของคุณ โปรดระบุว่าคุณใช้รูปแบบการป้อนข้อมูลใด!
  หมายเหตุ: นี่ยังหมายความว่าคุณได้รับอนุญาตให้ป้อนข้อมูลกรณีทดสอบ-5--15เป็นหรือ-5- -15 -5 - -15อย่างไรก็ตามตัวเลขที่ส่งผลให้--ควรป้อนโดยไม่มีช่องว่างหรือมีช่องว่างระหว่างทุกหลัก ดังนั้นกรณีทดสอบ9119สามารถป้อนเช่น9119หรือ9 1 1 9(เหตุผลที่91 19ไม่ได้รับอนุญาตเป็นเพราะคุณสามารถได้รับคำแนะนำจากพื้นที่สำหรับการค้นหา- -) ดังนั้นการเว้นวรรคจึงเป็นทางเลือกและได้รับอนุญาต
• รูปแบบเอาต์พุตสามารถอยู่ในรูปแบบที่สมเหตุสมผลเช่นกัน สามารถเป็นอักขระสองตัว สตริงสองอักขระเดี่ยว รายการสตริงที่มีอักขระสองตัว การโทรของคุณ โปรดระบุว่าคุณใช้รูปแบบผลลัพธ์ใด!
• คุณได้รับอนุญาตให้ใช้ที่แตกต่างกัน 14 ผลใด ๆ 0123456789+-*/ที่แมปไป ดังนั้นคุณจะได้รับอนุญาตให้ส่งออกจำนวนเต็มสองจำนวนที่แตกต่างกันหากคุณต้องการ (อีกครั้งโปรดระบุการแมปที่คุณใช้ถ้ามี)
• คุณต้องรองรับจำนวนเต็มเท่านั้น ดังนั้นจะไม่มีการทดสอบกรณีใด ๆ เช่นหรือ1/8=0.1251/8=0
• ตัวถูกดำเนินการทางคณิตศาสตร์คุณจะต้องสนับสนุน: นอกจาก ( +); การลบ ( -); การคูณ ( *หรือ×หรือ·); ส่วน ( /หรือ÷) (หมายเหตุ: อักขระระหว่างวงเล็บจะถูกเพิ่มเป็นการชี้แจงเท่านั้น)
• คุณจะต้องรองรับตัวเลขติดลบ วิธีนี้-สามารถตีความได้ในสมการทั้งตัวถูกดำเนินการทางคณิตศาสตร์หรือตัวบ่งชี้เชิงลบ
• คุณสามารถสมมติว่าสมการที่ไม่ถูกต้องและสมการที่ถูกต้องนั้นถูกต้องเสมอ (ดังนั้นจะไม่มีสิ่งใดเหมือน4-/2หรือ9+-+8เป็นตัวอย่าง)
• สมการอินพุตที่ไม่ถูกต้องสามารถมีการหารด้วย 0 แต่สมการที่ถูกต้องและที่คาดไว้จะไม่มีการหารด้วย 0
• สมการอินพุตที่ไม่ถูกต้องสามารถแก้ไขได้แม้ว่าคุณจะสลับปุ่มที่ต้องการกลับไป
• สมการอินพุตที่กำหนดอาจไม่เกี่ยวข้องกับปุ่มที่จะสลับ (เช่น4+4=8และ9/3=3สมการด้วยปุ่มสลับ2และ*)
• คุณสามารถสันนิษฐานได้ว่าจะมีการสลับที่เป็นไปได้เพียงครั้งเดียวเท่านั้นที่สามารถทำได้กับกรณีทดสอบที่กำหนด
• ปุ่มทั้งสองเพื่อสลับจะมีอยู่ในสมการที่ไม่ถูกต้องอย่างน้อยหนึ่งครั้งเสมอ

กฎทั่วไป:

• นี่คือcode-golfดังนั้นคำตอบที่สั้นที่สุดในจำนวนไบต์ชนะ
  อย่าปล่อยให้ภาษาโค้ดกอล์ฟกีดกันคุณจากการโพสต์คำตอบด้วยภาษาที่ไม่ได้เข้ารหัส พยายามหาคำตอบสั้น ๆ ที่เป็นไปได้สำหรับภาษาโปรแกรม 'ใด ๆ '
• กฎมาตรฐานจะใช้สำหรับคำตอบของคุณดังนั้นคุณจึงได้รับอนุญาตให้ใช้ STDIN / STDOUT ฟังก์ชั่น / วิธีการที่มีพารามิเตอร์ที่เหมาะสมและชนิดผลตอบแทนโปรแกรมเต็มรูปแบบ การโทรของคุณ
• ช่องโหว่เริ่มต้นเป็นสิ่งต้องห้าม
• หากเป็นไปได้โปรดเพิ่มลิงค์พร้อมทดสอบรหัสของคุณ
• นอกจากนี้โปรดเพิ่มคำอธิบายหากจำเป็น

กรณีทดสอบ:

Input:
123    = 3
8423   = 252
4+4    = 8
4*7-10 = 417
9/3    = 3
42-9   = -36

Output: 2 *

Input:
4/2   = 6
3/0   = 3
0/8+2 = 4
95-5  = 90
4+2   = 2

Output: + /

Input:
7+4    = 11
5-15   = 46
212-23 = -2121

Output: 1 -

Input:
4+8/2-9*1 = -5
99/3-13   = 20
1+2+3+4   = 10
4-3-2-1   = -6

Output: 2 4

Input:
18/18  = 1
98-8   = 90
55*88  = 4840
-5--15 = 10

Ouput: 5 8

Input:
9119    = 18
5-3     = 513
8*-9    = 152
13116/3 = -1

Output: 1 -

Perl 6 , 132 113 ไบต์

ขอบคุณ Jo King สำหรับ -19 ไบต์

->\e,$r {first {($!=e.trans($_=>.flip))ne e&&try "all {$!.&{S:g/\-/- /}} Z==$r".EVAL},[X~] (|^10,|<+ - * />)xx 2}

ลองออนไลน์!

อินพุตเป็นสตริงของสมการที่คั่นด้วยเครื่องหมายจุลภาคและสตริงผลลัพธ์ที่คั่นด้วยเครื่องหมายจุลภาค (หวังว่านี่จะโอเค) เอาต์พุตเป็นสตริงที่มีปุ่มสลับสองปุ่ม

--ได้อย่างถูกต้องจับ สินค้าอาจบวกเท็จสำหรับ---, ++, **หรือ//แต่ผมไม่สามารถที่จะเกิดขึ้นกับกรณีทดสอบ

JavaScript (ES7), 159 158 ไบต์

แก้ไข: เวอร์ชันใหม่เพื่อให้สอดคล้องกับกฎที่อัปเดตเกี่ยวกับ--
1 ไบต์ที่บันทึกไว้ขอบคุณ@Shaggy

รับอินพุตในรูปแบบ currying (e)(r)โดยที่eคืออาร์เรย์ของสมการและrคืออาร์เรย์ของผลลัพธ์ที่คาดหวัง ส่งคืนอาร์เรย์ของอักขระ

e=>r=>(l=[...2**29+'4+-*/']).filter(x=>l.some(y=>eval("try{eval((S=(s=`[${e}]`).replace(/./g,c=>c==x?y:c==y?x:c)).split`--`.join`+`)+''==r&S!=s}catch(e){}")))

กรณีทดสอบ

let f =

e=>r=>(l=[...2**29+'4+-*/']).filter(x=>l.some(y=>eval("try{eval((S=(s=`[${e}]`).replace(/./g,c=>c==x?y:c==y?x:c)).split`--`.join`+`)+''==r&S!=s}catch(e){}")))

console.log(JSON.stringify(f
  ([ '123', '8423', '4+4', '4*7-10', '9/3', '42-9' ])
  ([ 3, 252, 8, 417, 3, -36 ])
));

console.log(JSON.stringify(f
  ([ '4/2', '3/0', '0/8+2', '95-5', '4+2' ])
  ([ 6, 3, 4, 90, 2 ])
));

console.log(JSON.stringify(f
  ([ '7+4', '5-15', '212-23' ])
  ([ 11, 46, -2121 ])
));

console.log(JSON.stringify(f
  ([ '4+8/2-9*1', '99/3-13', '1+2+3+4', '4-3-2-1' ])
  ([ -5, 20, 10, -6 ])
));

console.log(JSON.stringify(f
  ([ '18/18', '98-8', '55*88', '-5--15' ])
  ([ 1, 90, 4840, 10 ])
));

console.log(JSON.stringify(f
  ([ '9119', '5-3', '8*-9', '13116/3' ])
  ([ 18, 513, 152, -1 ])
));

จัดรูปแบบและแสดงความคิดเห็น

e => r =>                                  // given e and r
  (l = [...2 ** 29 + '4+-*/'])             // generate l = [...'5368709124+-*/']
  .filter(x =>                             // for each character x of l
    l.some(y =>                            // for each character y of l
      eval("try {                          // we need to 'try', because we don't know
        eval(                              // whether the following expression is valid
          (S = (s = `[${e}]`).             // s = list of equations coerced to a string
            replace(/./g, c =>             // S =
              c == x ? y : c == y ? x : c  //   s with x and y exchanged
            )                              // end of replace()
          ).split`--`.join`+`              // replace '--' with '+'
        ) + '' == r                        // does the resulting list match r?
        & S != s                           // and was at least one character modified?
      } catch(e){}")                       // if we try, we oughta catch
    )                                      // end of some()
  )                                        // end of filter()

Python 2 , 204 , 199 , 193 , 173 , 165 ไบต์

• จาก 199 ไบต์ถึง 193 ไบต์ขอบคุณ Mr. Xcode
• จาก 193 ไบต์ถึง 173 ไบต์ขอบคุณ Halvard Hummel

s=input()
r=str.replace
t=set(''.join(zip(*s)[0]))
for i in t:
 for j in t:
	try:
	 if all(eval(r(r(r(e,i,'$'),j,i),'$',j))==v*(i<j)for e,v in s):print i,j
	except:0

ลองออนไลน์!

Oracle SQL & PL / SQL, 458 ไบต์

อินพุตอาจอยู่ในรูปแบบที่สมเหตุสมผล [... ] รายการที่มีสมการและอีกรายการที่มีผลลัพธ์ที่ถูกต้อง

รวบรวมฟังก์ชั่น PL / SQL (210 ไบต์):

CREATE FUNCTION f(x CHAR,y CHAR)RETURN NUMBER IS o NUMBER;BEGIN EXECUTE IMMEDIATE 'BEGIN :1:='||REPLACE(x,'--','- -')||';END;'USING OUT o;RETURN CASE o WHEN y THEN 1 END;EXCEPTION WHEN OTHERS THEN RETURN 0;END;

เรียกใช้ SQL (248 ไบต์):

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM T,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM T)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

หลังจากสร้างตารางTด้วยข้อมูลทดสอบแล้ว:

CREATE TABLE T(X,Y) AS
  SELECT '123',    3     FROM DUAL UNION ALL
  SELECT '8423',   252   FROM DUAL UNION ALL
  SELECT '4+4',    8     FROM DUAL UNION ALL
  SELECT '4*7-10', 417   FROM DUAL UNION ALL
  SELECT '9/3',    3     FROM DUAL UNION ALL
  SELECT '42-9',   -36   FROM DUAL

เอาท์พุท:

V V_1
- ---
2 *
* 2

รุ่นก่อนหน้า :

สมมติว่าการป้อนข้อมูลสตริงเช่น'123 = 3':

ฟังก์ชัน PL / SQL เดียวกันและ SQL (322 ไบต์):

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15),y(x,y)AS(SELECT REGEXP_SUBSTR(t,'[^=]+'),REGEXP_SUBSTR(t,'-?\d+$')FROM T)SELECT r.v,s.v FROM y,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM T)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

หลังจากสร้างตารางTด้วยข้อมูลทดสอบแล้ว:

CREATE TABLE T(T) AS
  SELECT '123    = 3'   FROM DUAL UNION ALL
  SELECT '8423   = 252' FROM DUAL UNION ALL
  SELECT '4+4    = 8'   FROM DUAL UNION ALL
  SELECT '4*7-10 = 417' FROM DUAL UNION ALL
  SELECT '9/3    = 3'   FROM DUAL UNION ALL
  SELECT '42-9   = -36' FROM DUAL;

เอาท์พุท:

V V_1
- ---
2 *
* 2

อัพเดท - การทดสอบ :

ซอ Fiddle

การตั้งค่า Schema ของ Oracle 11g R2 :

CREATE FUNCTION F(x CHAR,y CHAR)RETURN NUMBER IS o NUMBER;BEGIN EXECUTE IMMEDIATE 'BEGIN :1:='||REPLACE(x,'--','- -')||';END;'USING OUT o;RETURN CASE o WHEN y THEN 1 END;EXCEPTION WHEN OTHERS THEN RETURN 0;END;
/

CREATE TABLE A(X,Y) AS
  SELECT '123',    3     FROM DUAL UNION ALL
  SELECT '8423',   252   FROM DUAL UNION ALL
  SELECT '4+4',    8     FROM DUAL UNION ALL
  SELECT '4*7-10', 417   FROM DUAL UNION ALL
  SELECT '9/3',    3     FROM DUAL UNION ALL
  SELECT '42-9',   -36   FROM DUAL
/

CREATE TABLE B(X,Y) AS
  SELECT '4/2',    6     FROM DUAL UNION ALL
  SELECT '3/0',    3     FROM DUAL UNION ALL
  SELECT '0/8+2',  4     FROM DUAL UNION ALL
  SELECT '95-5',   90    FROM DUAL UNION ALL
  SELECT '4+2',    2     FROM DUAL
/

CREATE TABLE C(X,Y) AS
  SELECT '7+4',    11    FROM DUAL UNION ALL
  SELECT '5-15',   46    FROM DUAL UNION ALL
  SELECT '212-23', -2121 FROM DUAL
/

CREATE TABLE D(X,Y) AS
  SELECT '4+8/2-9*1', -5 FROM DUAL UNION ALL
  SELECT '99/3-13',   20 FROM DUAL UNION ALL
  SELECT '1+2+3+4',   10 FROM DUAL UNION ALL
  SELECT '4-3-2-1',   -6 FROM DUAL
/

CREATE TABLE E(X,Y) AS
  SELECT '18/18',  1     FROM DUAL UNION ALL
  SELECT '98-8',   90    FROM DUAL UNION ALL
  SELECT '55*88',  4840  FROM DUAL UNION ALL
  SELECT '-5--15', 10    FROM DUAL
/

CREATE TABLE G(X,Y) AS
  SELECT '9119',    18   FROM DUAL UNION ALL
  SELECT '5-3',     513  FROM DUAL UNION ALL
  SELECT '8*-9',    152  FROM DUAL UNION ALL
  SELECT '13116/3', -1   FROM DUAL
/

แบบสอบถาม 1 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM A,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM A)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| 2 | * |
| * | 2 |

แบบสอบถาม 2 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM B,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM B)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| + | / |
| / | + |

แบบสอบถาม 3 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM C,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM C)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| 1 | - |
| - | 1 |

แบบสอบถาม 4 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM D,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM D)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| 2 | 4 |
| 4 | 2 |

แบบสอบถาม 5 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM E,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM E)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| 5 | 8 |
| 8 | 5 |

แบบสอบถาม 6 :

WITH r(v)AS(SELECT SUBSTR('1234567890-+*/',LEVEL,1)FROM DUAL CONNECT BY LEVEL<15)SELECT r.v,s.v FROM G,r,r s WHERE r.v<>s.v GROUP BY r.v,s.v HAVING SUM(f(TRANSLATE(x,r.v||s.v,s.v||r.v),y))=(SELECT COUNT(1)FROM G)AND SUM(INSTR(x,r.v)+INSTR(x,s.v))>0

ผลลัพธ์ :

| V | V |
|---|---|
| 1 | - |
| - | 1 |

Powershell, 222 209 192 ไบต์

param($x)1..13|%{0..(($i=$_)-1)|%{$a,$b='+-*/0123456789'[$i,$_]
$a+$b|?{!($x|%{$e,$r=$_-split'='
try{$r-(-join$(switch($e|% t*y){$a{$b}$b{$a}default{$_}})-replace'-',' -'|iex)}catch{1}}|gu)}}}

สคริปต์ทดสอบและคำอธิบาย:

$f={

param($x)                               # array of strings with equations
1..13|%{                                #
    0..(($i=$_)-1)|%{                   # $i and $_ contains unique couples of different indecies
        $a,$b='+-*/0123456789'[$i,$_]  # $a and $b contains buttons to swap
        $g=$x|%{                        # for each equation from array
            $e,$r=$_-split'='           # split incorrect expression and correct result
            $e=-join$(switch($e|% t*y){ # swap buttons for each symbol in the expression
                $a{$b}
                $b{$a}
                default{$_}
            })
            $e=$e-replace'-',' -'       # insert a space before each '-'.
                                        # It need to work with negative numbers.
                                        # For example, '4--1' throws an exception, '4 - -1' returns '5'
            try{$r-($e|iex)}catch{1}    # Try to calc $e as powershell expression
                                        # return 0 if the expression result equal to the result of the calculation
                                        # return non zero integer otherwise
        }|gu                            # Get-unique of calculation for each equation
        if(!$g){                        # if $g is 0 or $null
                                        # then all calculations returns true
            $a+$b                       # Ok, return the couple of buttons
        }
    }
}

}

@(
    ,('2*','123=3','8423=252','4+4=8','4*7-10=417','9/3=3','42-9=-36')
    ,('/+','4/2=6','3/0=3','0/8+2=4','95-5=90','4+2=2')
    ,('1-','7+4=11','5-15=46','212-23=-2121')
    ,('42','4+8/2-9*1=-5','99/3-13=20','1+2+3+4=10','4-3-2-1=-6')
    ,('1-','9119=18','5-3=513','8*-9=152','13116/3=-1')
) | % {
    $e,$x=$_
    $r=&$f $x
    "$($e-eq$r): $r : $x"
}

เอาท์พุท:

True: 2* : 123=3 8423=252 4+4=8 4*7-10=417 9/3=3 42-9=-36
True: /+ : 4/2=6 3/0=3 0/8+2=4 95-5=90 4+2=2
True: 1- : 7+4=11 5-15=46 212-23=-2121
True: 42 : 4+8/2-9*1=-5 99/3-13=20 1+2+3+4=10 4-3-2-1=-6
True: 1- : 9119=18 5-3=513 8*-9=152 13116/3=-1

05AB1E , 21 ไบต์

SÙãʒË_}ʒ¹s‡„--'+:.EQ

ใส่เป็นสองรายการก่อนอื่นคือสมการและอันดับที่สองเป็นผลลัพธ์ เอาต์พุตเป็นรายการกรองคู่ที่มีทั้งการหมุน (เช่น[["2","*"],["*","2"]])

ลองมันออนไลน์หรือตรวจสอบกรณีทดสอบทั้งหมด (หมายเหตุ: ใช้รุ่นดั้งเดิมของ 05AB1E ใน TIO เนื่องจาก.Eถูกปิดใช้งานในรุ่นที่ใหม่กว่าบน TIO ด้วยเหตุนี้จึงเพิ่มï(cast to integer) เพิ่มเติมเนื่องจากในรุ่นดั้งเดิมของ 05AB1E 1.0และ1รายการภายในไม่เท่ากัน .)

คำอธิบาย:

S              # Convert the (implicit) input-list of equations to a list of characters
               # (which implicitly flattens)
               #  i.e. ["18/18","98-8","55*88","-5--15"]
               #   → ["1","8","/","1","8","9","8","-","8","5","5","*","8","8","-","5","-","-","1","5"]
 Ù             # Only leave all unique characters
               #  → ["1","8","/","9","-","5","*"]
  ã            # Cartesian product with itself; creating each possible pair of characters
               #  → [["1","1"],["1","8"],["1","/"],["1","9"],["1","-"],["1","5"],["1","*"],["8","1"],["8","8"],["8","/"],["8","9"],["8","-"],["8","5"],["8","*"],["/","1"],["/","8"],["/","/"],["/","9"],["/","-"],["/","5"],["/","*"],["9","1"],["9","8"],["9","/"],["9","9"],["9","-"],["9","5"],["9","*"],["-","1"],["-","8"],["-","/"],["-","9"],["-","-"],["-","5"],["-","*"],["5","1"],["5","8"],["5","/"],["5","9"],["5","-"],["5","5"],["5","*"],["*","1"],["*","8"],["*","/"],["*","9"],["*","-"],["*","5"],["*","*"]]
    ʒ  }       # Filter it by:
     Ë_        #  Where both characters are unique
               #   i.e. → [["1","8"],["1","/"],["1","9"],["1","-"],["1","5"],["1","*"],["8","1"],["8","/"],["8","9"],["8","-"],["8","5"],["8","*"],["/","1"],["/","8"],["/","9"],["/","-"],["/","5"],["/","*"],["9","1"],["9","8"],["9","/"],["9","-"],["9","5"],["9","*"],["-","1"],["-","8"],["-","/"],["-","9"],["-","5"],["-","*"],["5","1"],["5","8"],["5","/"],["5","9"],["5","-"],["5","*"],["*","1"],["*","8"],["*","/"],["*","9"],["*","-"],["*","5"]]
    ʒ          # Then filter the pairs again by:
     ¹         #  Push the first input-list with equations
      s        #  Swap to take the pair we're filtering
       Â       #  Bifurcate it (short for Duplicate and Reverse)
        ‡      #  Transliterate; replacing the characters at the same indices in the input-list
               #   i.e. ["18/18","98-8","55*88","-5--15"] and ["8","5"]
               #    → ["15/15","95-5","88*55","-8--18"]
               #   i.e. ["9119","5-3","8*-9","13116/3"] and ["1","-"]
               #    → ["9--9","513","8*19","-3--6/3"]
      „--'+:  '#  Then replace all "--" with a "+"
               #   → ["15/15","95-5","88*55","-8+18"]
               #   → ["9+9","513","8*19","-3+6/3"]
      .E       #  And evaluate the strings with Python eval
               #   → [1.0,90,4840,10]
               #   → [18,513,152,-1.0]
        Q      #  And then check if this evaluated list is equal to the (implicit) second input
               #   i.e. [1.0,90,4840,10] and [1,90,4840,10] → 1 (truthy)
               #   i.e. [18,513,152,-1.0] and [18,513,152,-1] → 1 (truthy)
               # (and output the result implicitly)
               #   i.e. [["8","5"],["5","8"]
               #   i.e. [["1","-"],["-","1"]