VB穷举法,求代码~已知x、y、z分别是0～9中的一个数,求x、y、z的值,使得xxz+yzz=532成立（其中xxz和yzz不表示乘积,而是由x、y、z组成的三位数）提示：使用穷举法编程实现.

Question

VB 穷举法,求代码~
已知x、y、z分别是0～9中的一个数,求x、y、z的值,使得xxz+yzz=532成立（其中xxz和yzz不表示乘积,而是由x、y、z组成的三位数）提示：使用穷举法编程实现.

Answer 1

Private Sub Command1_Click()
For x = 0 To 9
For y = 0 To 9
For z = 0 To 9
If Val(x & x & z) + Val(y & z & z) = 532 Then
Print "x=" & x & " " & "y=" & y & " " & "z=" & z
End If
Next
Next
Next
End Sub