復習7：解析算法和枚舉算法

解析算法和枚舉算法【知識要點】一、解析算法(1)解析算法的根本思想是指用解析的方法找出表示問題的前提條件與所求結果之間關系的數(shù)學表達式，并通過表達式的計算來實現(xiàn)問題的求解。(2)解析算法解題的根本思路①建立正確的數(shù)學模型，即得出正確的數(shù)學代數(shù)式。②保證計算過程描述的正確性。使用正確合理的VB變量、表達式來表示已經(jīng)得出的數(shù)學代數(shù)式。(3)解析算法程序實現(xiàn)的步驟①運用解析算法分析問題，尋找問題中各要素之間的關系，用數(shù)學表達式表示它們的關系。②寫出解決問題的解析步驟，編寫程序實現(xiàn)，通過運行程序求得問題的正確解。二、枚舉算法(1)枚舉算法的根本思想根據(jù)問題的本身特點，一一列舉出該問題的所有可能情況，并對可能情況進行逐一分析、判斷是否滿足條件，假設滿足，那么它是問題的一個正確解，從而挑選出符合條件的所有解。(2)采用枚舉算法解題的根本思路①確定枚舉對象、枚舉范圍和判斷條件。②一一枚舉可能的解，驗證是否是問題的解。(3)枚舉算法程序實現(xiàn)的三要素①枚舉解時，既不能遺漏任何一個真正解，也不能有重復，用循環(huán)語句實現(xiàn)。②條件判斷時，利用問題提供的約束條件篩選、判斷解的正確性，用選擇語句實現(xiàn)。③求解形式一般為輸出解的內容或進行與解相關的其他計算。(4)枚舉算法的程序實現(xiàn)循環(huán)語句＋選擇語句。循環(huán)語句用來羅列可能解的范圍。選擇語句用來判斷所羅列的可能解的正確性。【練習與穩(wěn)固】1．計算長方體體積的算法如下：①輸入長方體的長〔L〕、寬〔W〕、高〔H〕的值②計算體積V=L*W*H③輸出體積V上述算法屬于A.解析算法B.枚舉算法C.排序算法D.遞歸算法2．解決某物理問題的算法描述如下：①輸入線圈電阻值R，電壓V，通過線圈電流I，時間T②計算電動機消耗的總電能W1←UIt③計算電流通過線圈產(chǎn)生的熱量←I2Rt④計算電動機做的機械功W2←W1–P⑤輸出W1、Q和W2上述算法屬于()A.枚舉算法 B.解析算法C.查找算法 D.排序算法3．統(tǒng)計1～1000間個位數(shù)是4，且能被9整除的數(shù)共有多少個，可以采用的算法是()A.查找算法 B.枚舉算法C.解析算法 D.排序算法4．某超市打折促銷，規(guī)定如下：①購物未超過500元按原價支付；②購物超過500元但未超過1000元，超過500元局部按9折優(yōu)惠計價；③購物超過1000元但未超過1500元，超過1000元局部按8折優(yōu)惠計價；④購物超過1500元但未超過3000元，超過1500元局部按7折優(yōu)惠計價；⑤購物超過3000元，超過3000元局部按6折優(yōu)惠計價。根據(jù)購物貨款求實付金額，解決這個問題，最適合的算法是()A.枚舉算法 B.解析算法C.查找算法 D.遞歸算法5．在100～999中，找出能同時滿足除3余2，除5余3，除7余2的所有整數(shù)，解決這個問題，最適合的算法是()A.枚舉算法 B.解析算法C.查找算法 D.遞歸算法6．以下VB程序的功能是：在區(qū)間中查找前五個能被10整除，但不能被8整除的整數(shù)，并在列表框List1中輸出這些整數(shù)。為了實現(xiàn)這一目標，程序中劃線處應填入的語句是()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．一個兩位數(shù)，被7整除余1，假設交換它的十位數(shù)字與個位數(shù)字，所得到的新兩位數(shù)被5整除余2。在列表框List1中輸出所有符合條件的兩位數(shù)。PrivateSubCommand1_Click()DimiAsIntegerDimjAsIntegerFori=11To99IfiMod7=1Thenj=(iMod10)*10+i\10IfThenList1.AddItemStr()EndIfNextiEndSub9．小清在幫阿姨看店時碰到一問題：某品牌餅干，現(xiàn)存10箱5千克重的，4箱2千克重的，8箱1千克重的，一位顧客要買9千克餅干，為了便于攜帶要求不開箱。雖然他很快解決了這個問題，但又覺察應該有多種發(fā)貨方式。他打算用VB來解決這個問題，設計界面和代碼如下：PrivateSubCommand1_Click()DimiAsInteger′用于存儲內裝5千克餅干的箱數(shù)DimjAsInteger′用于存儲內裝2千克餅干的箱數(shù)DimkAsInteger′用于存儲內裝1千克餅干的箱數(shù)′①Forj=0To4Fork=0To8IfThen′②List1.AddItemStr(i)+Str(j)+Str(k)EndIfNextkNextjNextiEndSub〔1〕在橫線①處添加適宜的代碼，并使該算法最優(yōu)：〔2〕在橫線②處添加適宜的代碼，使其實現(xiàn)上述功能：〔3〕該程序主要運用了算法〔選填：解析/枚舉〕10．某商場營業(yè)員的月獎金計算方法如下：獎金＝根本獎金+加班費+提成費。根本獎金500元；加班加發(fā)120元/天；本月營業(yè)額假設超過5萬元，那么提成費為營業(yè)額的3%，假設在5萬元及以下，那么提成費為營業(yè)額的2%。要求設計一個VB程序，在文本框Text1中輸入本月加班天數(shù)，Text2中輸入本月營業(yè)額，在文本框Text3中顯示該營業(yè)員的本月獎金。以下是為解決該問題用VB設計的界面：(1)在設計應用程序界面時，要使按鈕Command1上顯示“計算〞，在其對應的屬性窗口中修改屬性的屬性值為“計算〞加以實現(xiàn)。(2)為實現(xiàn)上述功能，請在劃線處填入適宜代碼。PrivateSubCommand1_Click()DimdayAsInteger’存儲本月加班天數(shù)DimturAsSingle’存儲本月營業(yè)額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程序，實現(xiàn)如下功能：在文本框Text1中輸入包含數(shù)字、字母的字符，單擊“統(tǒng)計〞按鈕Command1，統(tǒng)計該字符串中數(shù)字字符的個數(shù)，并在標簽Label1中輸出結果。界面如下－1圖所示：(1)在設計應用程序界面時應使用-2圖所示“控件工具箱〞中的(填寫相應編號)添加“統(tǒng)計〞按鈕。(2)為實現(xiàn)上述功能，請在劃線處填入適宜代碼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中輸入客車的座數(shù)，單擊“收費〞按鈕，在文本框Text2中顯示應收的費用。為實現(xiàn)此功能，請在畫線處填入適宜的語句。①②PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx＝Val(Text1.Text)If①Theny＝40ElseIfx>＝20Theny＝30ElseIfx>＝8Theny＝20Else②EndIfText2.Text＝Str(y)EndSub13．小王在20米高的樓房上，拿一個質量為0.5千克的彈簧球做自由落體。由于受空氣阻力的影響，彈簧球每次在下落到地面和反彈到最高點的過程中都要損失自己10%的機械能，問彈簧球在落地幾次后靜止？(注：以地面為參照物，當機械能小于或等于1焦耳視為靜止)為了模擬和計算彈簧球落地的次數(shù)，編寫了如下程序，統(tǒng)計結果顯示在文本框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〕密碼是八位數(shù)字，前面兩位為19；〔2〕最后兩位數(shù)字是91；〔3〕能被77和133整除。程序界面如下圖，單擊“尋找密碼〞按鈕(Command1)后，可能的密碼顯示在列表框List1中。解決此問題的相應程序如下：PrivateSubCommand1_Click()DimiAsLong,sAsLongFori＝0To9999s＝①IfsMod77＝0AndsMod133＝0Then②EndIfNextiEndSub(1)解決此問題的算法是。(填：枚舉算法/解析算法/查找算法)(2)在程序①和②畫線處，填入適當?shù)恼Z句或表達式，把程序補充完整：程序中①畫線處應填入。程序中②畫線處應填入。習題七：1-