abc+cba=1333,其中a、b、c均为一位数，编写一个程序求出a、b、c分别代表什么数字。
最新回答
九命猫
2024-10-02 00:23:55
a*(100+1)+c*(100+1)+20*b=1333
(a+c)*101+20b=1333
(a+c)*101+101b - 81b=1333
(a+b+c)*101=1333+81b
(a+b+c)*101=101*14-81+81b
(a+b+c)/14=14*(1+b)
但是a+c=3或是13 及a+b+c要能整除14, a+c=3不成立
a+c=13, 所以 b =1
a+c = 13的组合有7+6, 8+5及9+4
所以会是914+419=1333
815+518=1333
716+617=1333
死亡与爱
2024-10-02 00:41:13
Private Sub Command1_Click()
'abc + cba = 1333
Dim a As Long, b As Long, c As Long
For a = 0 To 9
For b = 0 To 9
For c = 0 To 9
If a <> b And a <> c And b <> c Then
If CLng(a & b & c) + CLng(c & b & a) = 1333 Then
Print a; b; c, a & b & c & " + " & c & b & a & " = " & CLng(a & b & c) + CLng(c & b & a)
End If
End If
Next
Next
Next
End Sub
有校服就不用买情侣装了
2024-10-02 00:21:57
热门标签
