新浪微博上的一道算术题
在新浪微博上看到一个题目：
001.png
xy
x
-------
zzz
根据题目列出条件为：
mod(x*y,10)=z
mod(x*y\10+x*x,10)=z
(x*y\10+x*x)\10=z
Dim x,y,z
'MsgBox 12 Mod 10
'MsgBox 9\4
For x=0 to 9
For y=0 to 9
For z=0 to 9
'mod(x*y,10)=z
'mod(x*y\10+x*x,10)=z
'(x*y\10+x*x)\10=z
If (x*y Mod 10=z) And ((x*y\10+x*x) Mod 10=z) And (x*y\10+x*x)\10=z Then
MsgBox "x=" & x & " y=" & y & " z=" & z
End If
Next
Next
Next
结果：
x=0 y=0 z=0
x=0 y=1 z=0
x=0 y=2 z=0
x=0 y=3 z=0
x=0 y=4 z=0
x=0 y=5 z=0
x=0 y=6 z=0
x=0 y=7 z=0
x=0 y=8 z=0
x=0 y=9 z=0
x=3 y=7 z=1
编程有意思吧，嘿嘿嘿
