问个vb问题0072块砖,共72人搬,每次男的搬4块,女的搬3块,2个小孩抬1块,要求一次全部搬完,问男、女、小孩各多少人?提示：本题是一类比较常见的使用“穷举法”解题的题型.“穷举法”也称为

Question

问个vb问题 0 0
72块砖,共72人搬,每次男的搬4块,女的搬3块,2个小孩抬1块,要求一次全部搬完,问男、女、小孩各多少人?
提示：本题是一类比较常见的使用“穷举法”解题的题型.“穷举法”也称为“枚举法”,即将可能出现的各种情况一一测试,判断是否满足条件,一般采用循环来实现.
该怎么写……

Answer 1

Private Sub Command1_Click()For i = 0 To 72For j = 0 To 72For k = 0 To 72If i + j + k = 72 And 4 * i + 3 * j + k / 2 = 72 Then Print "男："; i,"女:"; j,"孩"; kNextNextNextEnd Sub