第11、12课枚举和解析算法(两课时)高中信息技术选修一解析法穷举法课件.ppt

水仙花数解法二：X（abc） Private Sub Command2_Click() For a = 1 To 9 For b = 0 To 9 For c = 0 To 9 If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Then Print a * 100 + b * 10 + c End If Next c Next b Next a End Sub 2、百钱百鸡问题：“公鸡五文钱一只，母鸡三文钱一只，小鸡一文钱三只”，一百文钱买一百只鸡，问买公鸡、母鸡、小鸡各多少只？ 分析： x+y+z=100 5x+3y+z/3=100 Private Sub Command1_Click() For x = 1 To 20 For y = 1 To 33 z = 100 - x - y If x * 5 + y * 3 + z / 3 = 100 Then Print x, y, z End If Next y Next x End Sub 达标练习：判断用解析法还是枚举法。 枚举法 枚举法：（穷举法、列举法） 将