【数学】不差的「来看看」，求一个简单的『+-*/』算法。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
a=(随机100~9999)
求算法，(a+i)小于10000，
要求a越小，i与a的倍数就越大。
比如 a=100 左右 那么可能 (a+i) 就差不多等于1000左右
比如 a=1000 左右 那么可能 (a+i) 就差不多等于3000左右
比如 a=2000 左右 那么可能 (a+i) 就差不多等于5000左右
比如 a=3000 左右 那么可能 (a+i) 就差不多等于6000左右
比如 a=5000 左右 那么可能 (a+i) 就差不多等于7000左右
比如 a=9500 左右 那么可能 (a+i) 就差不多等于9990左右
a越小，i与a的倍数就越大。
本人数学没学好，想了很久没想到好的。求一个算法，不行给个思路也行啊。。我数学很差的。。 -_-!
[解决办法]
大致是这个样子，只有 5000 对不上。
Dim a As Long, m As Long, n As Long, i As Long
a = Val(Text1)
i = ((10000 - a) \ (10000 \ a) ^ 0.5) * 0.8
Text2 = CStr(a + i)
