Question

用excel 求一个三位数 这个三位数除以每位数之和等于每位数之和+1！！！！！！！急！！在线等！！

Find the 3-digit number that when divided by the sum of its digits the answer is the sum of the digits plus
1.

Use two different approaches in Excel, one of which involves use of the Solver function, to calculate the
answer. Make sure in your writeup you define the optimization problem you are solving.

用excel 找一个三位数 这个三位数除以他每一位数的和 等于每一位数的和+1！！
求怎么做啊！！！！要用两种方法！！其中一种要用到solver！！

例如三位数 123 ，123/(1+2+3）=(1+2+3)+1 就是这个意思！！！

Answer 1

Sub a()
'三位数 123 ，123/(1+2+3）=(1+2+3)+1
Dim i%, j%, k%
For i = 0 To 9
    For j = 0 To 9
        For k = 0 To 9
            If i <> 0 And j <> 0 And k <> 0 Then
                l = i & j & k
                If l / (i + j + k) = (i + j + k) + 1 Then
                    Range("a" & Range("a65536").End(xlUp).Row) = l
                End If
            End If
        Next
    Next
Next
End Sub

来个最简单的穷举法。答案是 156

solver是规划求解，具体方法可以参考百度经验 

http://jingyan.baidu.com/article/14bd256e2cdd0ebb6c261264.html

追问

这个是excel吗？要求一定要用excel QAQ

追答

确实就是excel呃。。这个是vba，alt+F11 进去 新增一个模块，贴代码进去就可以F5了。

Answer 2

这个数是
156

A1输入=RANDBETWEEN(100,999)
B1=A1/(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))=(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))+1
按F9变化，如果B1出现 TRUE ，A1就为正确的结果。

追问

能用excel 做出来吗QAQ

追答

这个数是
156

A1输入=RANDBETWEEN(100,999)
B1=A1/(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))=(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))+1
按F9变化，如果B1出现 TRUE
A1就为正确的结果。

追问

他要用两种方法做， 其中一种要用Solver，该怎么做啊

追答

随机函数
或
A1=ROUND(RAND()*899+100,0)
B1=A1/(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))=(MID(A1,1,1)+MID(A1,2,1)+MID(A1,3,3))+1
都下拉公式，行数无所谓
按F9，只要B列出现 TRUE
对应的A列就是 结果。

追问

那用solver呢？

追答

事先 有1列 数据，用规划求解。

Answer 3

这个可以用excel规划求解来做，具体方法不好说，可以网上找。或者给个邮箱发个做的结果

追问

请问能发我吗QAQ 514404427

追答

已发,不懂得再说

Answer 4

是固定3位数吗？还是N位不定数

追问

就是三位数~