^表示異或，數值都是16進制，如何求解 x、y
0x32^X + 0x30^Y = 0xF2
0x42^X + 0x40^Y = 0x12

好困難

窮舉應該可以搞定，最多只要255次。

窮舉要256×256次

我只能這樣窮舉了，效率低啊
[attachment=142850]

|41+4F|44+4C|45+4B|46+4E|47+4D|48+48|49+47|4A+4A|4B+49|4C+44|4D+43|4E+46|4F+45

好多解啊

附上源碼吧

Private Sub Command1_Click()
Dim i, j As Integer

For i = 0 To 255
For j = 0 To 255

If (&H32 Xor i) + (&H30 Xor j) = &HF2 Then

If (&H42 Xor i) + (&H40 Xor j) = &H12 Then

Text1 = ""

Text1 = Text1 + "|" + Hex(i) + "+" + Hex(j)

End If

End If

Next j
Next i

End Sub

引用

引用第5樓sswater于2015-12-20 20:56發表的  :
附上源碼吧

Private Sub Command1_Click()
Dim i, j As Integer

.......

多謝，這個原來是想解密AA6發編譯密碼的，可惜用不上了

請問樓主，異或方程組在plc編程上用在什么場合

引用

引用第3樓lizhiliang于2015-12-20 19:14發表的  :
窮舉要256×256次

我只能這樣窮舉了，效率低啊
[attachment=142850]

太牛了，用PLC算的��！