已知x、y、z分别是0~9中的一个数,求x、y、z的值,使得下式成立：xxz+yzz=532,（其

Answer 1

Private Sub Command1_Click()
Me.AutoRedraw = True
Dim x,y,z As Integer
For x = 0 To 9
For y = 0 To 9
For z = 0 To 9
If 100 * x + 10 * x + z + 100 * y + 10 * z + z = 532 Then
Print x & y & z
End If
Next
Next
Next
End Sub
结果
x y z
2 3 1