复习7：解析算法和枚举算法

解析算法和枚举算法【知识要点】一、解析算法(1)解析算法的根本思想是指用解析的方法找出表示问题的前提条件与所求结果之间关系的数学表达式，并通过表达式的计算来实现问题的求解。(2)解析算法解题的根本思路①建立正确的数学模型，即得出正确的数学代数式。②保证计算过程描述的正确性。使用正确合理的VB变量、表达式来表示已经得出的数学代数式。(3)解析算法程序实现的步骤①运用解析算法分析问题，寻找问题中各要素之间的关系，用数学表达式表示它们的关系。②写出解决问题的解析步骤，编写程序实现，通过运行程序求得问题的正确解。二、枚举算法(1)枚举算法的根本思想根据问题的本身特点，一一列举出该问题的所有可能情况，并对可能情况进行逐一分析、判断是否满足条件，假设满足，那么它是问题的一个正确解，从而挑选出符合条件的所有解。(2)采用枚举算法解题的根本思路①确定枚举对象、枚举范围和判断条件。②一一枚举可能的解，验证是否是问题的解。(3)枚举算法程序实现的三要素①枚举解时，既不能遗漏任何一个真正解，也不能有重复，用循环语句实现。②条件判断时，利用问题提供的约束条件筛选、判断解的正确性，用选择语句实现。③求解形式一般为输出解的内容或进行与解相关的其他计算。(4)枚举算法的程序实现循环语句＋选择语句。循环语句用来罗列可能解的范围。选择语句用来判断所罗列的可能解的正确性。【练习与稳固】1．计算长方体体积的算法如下：①输入长方体的长〔L〕、宽〔W〕、高〔H〕的值②计算体积V=L*W*H③输出体积V上述算法属于A.解析算法B.枚举算法C.排序算法D.递归算法2．解决某物理问题的算法描述如下：①输入线圈电阻值R，电压V，通过线圈电流I，时间T②计算电动机消耗的总电能W1←UIt③计算电流通过线圈产生的热量←I2Rt④计算电动机做的机械功W2←W1–P⑤输出W1、Q和W2上述算法属于()A.枚举算法 B.解析算法C.查找算法 D.排序算法3．统计1～1000间个位数是4，且能被9整除的数共有多少个，可以采用的算法是()A.查找算法 B.枚举算法C.解析算法 D.排序算法4．某超市打折促销，规定如下：①购物未超过500元按原价支付；②购物超过500元但未超过1000元，超过500元局部按9折优惠计价；③购物超过1000元但未超过1500元，超过1000元局部按8折优惠计价；④购物超过1500元但未超过3000元，超过1500元局部按7折优惠计价；⑤购物超过3000元，超过3000元局部按6折优惠计价。根据购物货款求实付金额，解决这个问题，最适合的算法是()A.枚举算法 B.解析算法C.查找算法 D.递归算法5．在100～999中，找出能同时满足除3余2，除5余3，除7余2的所有整数，解决这个问题，最适合的算法是()A.枚举算法 B.解析算法C.查找算法 D.递归算法6．以下VB程序的功能是：在区间中查找前五个能被10整除，但不能被8整除的整数，并在列表框List1中输出这些整数。为了实现这一目标，程序中划线处应填入的语句是()DimpAsInteger，iAsIntegeri＝1∶p＝0DoWhilei<＝1000AndIfiMod10＝0AndiMod8<>0ThenList1.AddItemip＝p＋1EndIfi＝i＋1Loop程序中划线处应填入的语句是()A.p＝5B.p<＝5C.p<5D.p≠57．小清利用VB设计的程序界面和代码如下：PrivateSubCommand1_Click()DimxAsDouble,yAsDoublex=Val(Text1.Text)Ifx>1Theny=x-2Elsey=2^xText2.Text=Str(y)EndSub(1)该程序主要使用的是算法〔解析/枚举〕。(2)在横线处添加适宜的VB语句，使其符合代码要求。(3)该VB程序中输出变量y与输入变量x满足的关系式是。8．一个两位数，被7整除余1，假设交换它的十位数字与个位数字，所得到的新两位数被5整除余2。在列表框List1中输出所有符合条件的两位数。PrivateSubCommand1_Click()DimiAsIntegerDimjAsIntegerFori=11To99IfiMod7=1Thenj=(iMod10)*10+i\10IfThenList1.AddItemStr()EndIfNextiEndSub9．小清在帮阿姨看店时碰到一问题：某品牌饼干，现存10箱5千克重的，4箱2千克重的，8箱1千克重的，一位顾客要买9千克饼干，为了便于携带要求不开箱。虽然他很快解决了这个问题，但又觉察应该有多种发货方式。他打算用VB来解决这个问题，设计界面和代码如下：PrivateSubCommand1_Click()DimiAsInteger′用于存储内装5千克饼干的箱数DimjAsInteger′用于存储内装2千克饼干的箱数DimkAsInteger′用于存储内装1千克饼干的箱数′①Forj=0To4Fork=0To8IfThen′②List1.AddItemStr(i)+Str(j)+Str(k)EndIfNextkNextjNextiEndSub〔1〕在横线①处添加适宜的代码，并使该算法最优：〔2〕在横线②处添加适宜的代码，使其实现上述功能：〔3〕该程序主要运用了算法〔选填：解析/枚举〕10．某商场营业员的月奖金计算方法如下：奖金＝根本奖金+加班费+提成费。根本奖金500元；加班加发120元/天；本月营业额假设超过5万元，那么提成费为营业额的3%，假设在5万元及以下，那么提成费为营业额的2%。要求设计一个VB程序，在文本框Text1中输入本月加班天数，Text2中输入本月营业额，在文本框Text3中显示该营业员的本月奖金。以下是为解决该问题用VB设计的界面：(1)在设计应用程序界面时，要使按钮Command1上显示“计算〞，在其对应的属性窗口中修改属性的属性值为“计算〞加以实现。(2)为实现上述功能，请在划线处填入适宜代码。PrivateSubCommand1_Click()DimdayAsInteger’存储本月加班天数DimturAsSingle’存储本月营业额DimbonusAsSingle’存储本月奖金day=Val(Text1.Text)tur=Val(Text2.Text)bonus=500bonus=bonus+day*120IfThenbonus=bonus+tur*0.03Elsebonus=bonus+tur*0.02EndIfText3.Text=Str()EndSub11．编写VB程序，实现如下功能：在文本框Text1中输入包含数字、字母的字符，单击“统计〞按钮Command1，统计该字符串中数字字符的个数，并在标签Label1中输出结果。界面如下－1图所示：(1)在设计应用程序界面时应使用-2图所示“控件工具箱〞中的(填写相应编号)添加“统计〞按钮。(2)为实现上述功能，请在划线处填入适宜代码PrivateSubCommand1_Click()DimsAsString,cAsStringDimIAsInteger,nAsInteger,numAsIntegers=num=0n=Len(s)Ifc>=″0″Andc<=″9″Thennum=num+1EndIfNextiLabel1.Caption=str(num)EndSub12．某高速公路收费站对客车收费的标准如下：7座及以下的收费10元，8座至19座的收费20元，20座到39座的收费30元，40座及以上的收费40元。例如，一辆25座的客车，应付的费用为30元，一辆5座的轿车应付的费用为10元。用VB编写的程序运行界面如下图，在文本框Text1中输入客车的座数，单击“收费〞按钮，在文本框Text2中显示应收的费用。为实现此功能，请在画线处填入适宜的语句。①②PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx＝Val(Text1.Text)If①Theny＝40ElseIfx>＝20Theny＝30ElseIfx>＝8Theny＝20Else②EndIfText2.Text＝Str(y)EndSub13．小王在20米高的楼房上，拿一个质量为0.5千克的弹簧球做自由落体。由于受空气阻力的影响，弹簧球每次在下落到地面和反弹到最高点的过程中都要损失自己10%的机械能，问弹簧球在落地几次后静止？(注：以地面为参照物，当机械能小于或等于1焦耳视为静止)为了模拟和计算弹簧球落地的次数，编写了如下程序，统计结果显示在文本框Text1中。该算法的流程图如下图，在程序画线处应填入的适宜表达式或语句分别是：②PrivateSubCommand1_Click()DimcountAsIntegerDimmAsSingle,gAsSingleDimhAsSingle,eAsSinglem＝0.5g＝10h＝20count＝0e＝m*g*h*0.9DoWhile①e＝e*0.81②LoopText1.text＝str(count)EndSub14．小明的126邮箱密码忘记了，但他还零星记得有关于密码的一些信息：〔1〕密码是八位数字，前面两位为19；〔2〕最后两位数字是91；〔3〕能被77和133整除。程序界面如下图，单击“寻找密码〞按钮(Command1)后，可能的密码显示在列表框List1中。解决此问题的相应程序如下：PrivateSubCommand1_Click()DimiAsLong,sAsLongFori＝0To9999s＝①IfsMod77＝0AndsMod133＝0Then②EndIfNextiEndSub(1)解决此问题的算法是。(填：枚举算法/解析算法/查找算法)(2)在程序①和②画线处，填入适当的语句或表达式，把程序补充完整：程序中①画线处应填入。程序中②画线处应填入。习题七：1-