有红黄蓝白色卡各张 每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它们构成一个四位数,并计算这有红黄蓝白色卡各张\x0d每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它

有红黄蓝白色卡各张 每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它们构成一个四位数,并计算这有红黄蓝白色卡各张\x0d每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它
有红黄蓝白色卡各张 每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它们构成一个四位数,并计算这
有红黄蓝白色卡各张\x0d每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它们构成一个四位数,并计算这个四位数与它的各位数字和的10倍的差,发现无论蓝色卡片上是什么数字,计算结果都是1998,红黄白色卡片上各是什么数字?

有红黄蓝白色卡各张 每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它们构成一个四位数,并计算这有红黄蓝白色卡各张\x0d每张卡片上都有一个数字,将卡片按红黄蓝白顺序放置,使它
Dim A As Integer
Dim B As Integer
Dim D As Integer
For A = 0 To 9
For B = 0 To 9
For D = 0 To 9
If 1000 * A + 100 * B + D - 10 * (A + B + D) = 1998 Then
Print A,B,D
End If
Next D
Next B
Next A
结果：
红 2
黄 1
蓝 0--9都可以
白 8

红：2
黄：-2
白：-22