白玉兰公寓房价:VB编程题

来源:百度文库 编辑:高校问答 时间:2024/05/07 07:22:26
鸡翁一、值钱五、鸡母一、值钱三,鸡雏三、值钱一,百钱买百鸡,问鸡翁、母、雏各几何?

For x = 1 To 20
For y = 1 To 34
For z = 1 To 100
Sum = x + y + z
price = 5 * x + 3 * y + z / 3
If (Sum = 100) And price = 100 Then
Print x, y, z
End If
Next z
Next y
Next x

For x = 1 To 20
For y = 1 To 34
For z = 1 To 100
Sum = x + y + z
price = 5 * x + 3 * y + z / 3
If (Sum = 100) And price = 100 Then
Print x, y, z
End If
Next z
Next y
Next x