杭州交通信息网在线观看的邪恶动漫:VB编程题
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/03 20:37:53
鸡翁一、值钱五、鸡母一、值钱三，鸡雏三、值钱一，百钱买百鸡，问鸡翁、母、雏各几何？
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