枚举算法之算法实现PPT课件.ppt

枚举算法之程序实现 1 什么是枚举算法 鸡 兔同笼问题 鸡 兔共79只 200只脚在笼里走 试问多有少只鸡 多少只兔 枚举法就是按问题本身的性质 一一列举出该问题所有可能的解 并在逐一列举的过程中 检验每个可能解是否是问题的真正解 若是 我们采纳这个解 否则抛弃它 2 解题过程 解题过程分两步 逐一列举可能的解的范围 这个过程用循环结构实现 对每一个列举可能的解进行检验 判断是否为真正的解 这个过程用分支结构实现 枚举算法 循环结构 分支结构 循环结构内嵌套选择结构 3 结构流程图 作用 逐一列举可能解的范围 作用 逐一检验可能解的是否是真解 4 代码填空 DimchickenAsIntegerDimfootAs Forchicken 1to foot If Print 鸡 Str EndIfNextchicken integer Chicken 2 79 chicken 4 79 Foot 200 then chicken 5 PrivateSubForm Click DimrabbitAsIntegerDimchickenAsIntegerDimfootAsIntegerForchicken 1To79foot chicken 2 79 chicken 4Iffoot 200ThenPrint 鸡 Str chicken rabbit 79 chickenPrint 兔 Str rabbit EndIfNextchickenEndSub 6 例 一份单据被涂抹的数字的推算 问题 一张单据上有一个5位数的编号 其百位数和十位数处已经变得模糊不清 如图所示 但是知道这个5位数是37或67的倍数 现在要设计一个算法 找出所有满足这些条件的5位数 并统计这些5位数的个数 要求 分别有DO循环和FOR循环各写出一段代码 任务 7 00 01 02 03 98 99 00 01 02 03 98 99 让变量J依次取0到99这100个不同的值 同时对于J的每个确定的值乘以10加上25006这样就能形成一个可能解 0 J 乘以10 00 加上25006 25006 1 10 25016 2 20 25026 98 980 25986 99 990 25996 J 验证条件 NMOD37 0ORNMOD67 0 8 2020 2 6 9 10 for循环 PrivateSubCommand1 Click DimjAsInteger 定义一个中间被涂抹的两位数变量DimnAsInteger 定义被求的结果5位数变量DimcAsInteger 定义被求的符合要求的五位数个数变量c 0List1 ClearForj 0To99n 25006 j 10IfnMod37 0OrnMod67 0ThenList1 AddItemStr n c c 1EndIfNextjList1 AddItem 总计有 Str c 个五位数 EndSub 11 Do循环 PrivateSubCommand1 Click DimjAsInteger 定义一个中间被涂抹的两位数变量DimnAsInteger 定义被求的结果5位数变量DimcAsInteger 定义被求的符合要求的五位数个数变量c 0List1 ClearDoWhilej 99n 25006 j 10IfnMod37 0OrnMod67 0ThenList1 AddItemStr n c c 1EndIfj j 1LoopList1 AddItem 总计有 Str c 个五位数 EndSub 12 2 在联欢会上 小明提出玩数7的游戏 游戏规则 从1开始数起 每个人数一个数 凡是遇到7的倍数 就要喊 过 这样一直数到100为止 要求 用枚举算法帮小明找出1到100之间所有7的倍数 结果显示在窗体上 13 PrivateSubForm Click DimiAsIntegeri 1Fori 1To100IfiMod7 0ThenPrintiEndIfNextiEndSub for循环 14 PrivateSubForm Click DimiAsIntegeri 1DoWhilei 100IfiMod7 0ThenPrintiEndIfi i 1LoopEndSub Do循环 15 课堂总结 枚举算法 循环结构 分支结构做到既不遗漏任何一个解 也不重