作业帮小明拿10元钱要买100个蛋,鹅蛋一分钱一个,鸭蛋一毛五一个,鸡蛋三毛一个,请问鹅蛋,鸭蛋,鸡蛋各多少个?干嘛抄这个给我~不一样的题目
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/20 12:31:26
小明拿10元钱要买100个蛋,鹅蛋一分钱一个,鸭蛋一毛五一个,鸡蛋三毛一个,请问鹅蛋,鸭蛋,鸡蛋各多少个?干嘛抄这个给我~不一样的题目
小明拿10元钱要买100个蛋,鹅蛋一分钱一个,鸭蛋一毛五一个,鸡蛋三毛一个,请问鹅蛋,鸭蛋,鸡蛋各多少个?
干嘛抄这个给我~不一样的题目
小明拿10元钱要买100个蛋,鹅蛋一分钱一个,鸭蛋一毛五一个,鸡蛋三毛一个,请问鹅蛋,鸭蛋,鸡蛋各多少个?干嘛抄这个给我~不一样的题目
鹅蛋一分钱一个?
鹅蛋,鸭蛋,鸡蛋各x,y,z
x+y+z=100.(1)
0.01x+0.15y+0.3z=10.(2)
(2)化简
x+15y+30z=1000.(3)
30*(1)-(3)
29x+15y=2000
x=(2000-15y)/29
(3)-(1)
14y+29z=900.(4)
z=(900-14y)/29.(5)
我们从（4）分析
14y+29z=900
求y,z的整数解
14y+29z可以转化为14（y+2z)+z
即转化为14（y+2z)+z=900
显然29z
鸡蛋：75 鸭蛋：25 鹅蛋：0
鸡蛋：84 鸭蛋：8 鹅蛋：8
=====================================
用vb做的。
尽管你需要算法的可能性比较小 还是给你吧。
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Inte...
全部展开
鸡蛋：75 鸭蛋：25 鹅蛋：0
鸡蛋：84 鸭蛋：8 鹅蛋：8
=====================================
用vb做的。
尽管你需要算法的可能性比较小 还是给你吧。
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
For x = 1 To 300
For y = 1 To 33
z = 100 - x - y
If x / 3 + y * 3 + z * 6 = 100 Then
Print "鸡蛋:"; x, "鸭蛋:"; y, "鹅蛋:"; z
End If
Next y
Next x
End Sub
===============================
或者解方程 问题是这个比较累 穷举啊
设鸡蛋,鸭蛋,鹅蛋分别为x,y,z个.则有
x / 0.3 + y * 0.3 + z * 0.6 = 10
x+y+z=100
收起