高中信息技術(shù)選修一解析法窮舉法課件

第三章算法的程序?qū)崿F(xiàn)

一、解析法、窮舉法

信息技術(shù)組第三章算法的程序?qū)崿F(xiàn)

一、解析法、窮舉法

信息技術(shù)組1例1：某超市規(guī)定，顧客購買同種商品10件以上（含10件）可享受批發(fā)價。請設(shè)計一個收款機(jī)程序，輸入顧客所購買商品的零售價、批發(fā)價、購買數(shù)量、及付款數(shù)，計算出顧客的應(yīng)付款及找零。變量分析：數(shù)學(xué)模型：應(yīng)付款＝找零＝付款－應(yīng)付款零售價*數(shù)量，當(dāng)數(shù)量<10批發(fā)價*數(shù)量

，當(dāng)數(shù)量>=10解析表達(dá)式例1：某超市規(guī)定，顧客購買同種商品10件以上（含10件）可享2程序代碼：PrivateSubCommand1_Click()

零售價=Val(InputBox("輸入零售價：")) 批發(fā)價=Val(InputBox("輸入批發(fā)價：")) 數(shù)量=Val(InputBox("輸入購買數(shù)量：")) 付款=Val(InputBox("輸入付款數(shù)：")) If數(shù)量<10Then 應(yīng)付款=零售價*數(shù)量 Else ___________________ EndIf

_____________________ Print"應(yīng)付款：",應(yīng)付款 Print"找零",找零EndSub應(yīng)付款=批發(fā)價

*數(shù)量找零=付款-應(yīng)付款程序代碼：PrivateSubCommand1_Clic3解析法：就是在分析具體問題的基礎(chǔ)上，抽取出一個數(shù)學(xué)模型，這個數(shù)學(xué)模型能用若干解析表達(dá)式表示出來，解決了這些表達(dá)式，問題也就得以解決。用解析法解決問題的關(guān)鍵是尋找_______。解析表達(dá)式解析法：就是在分析具體問題的基礎(chǔ)上，抽取出一個數(shù)學(xué)模型，這個4練習(xí)：已有的研究成果表明，海拔每升高100米，年平均氣溫降低0.5℃。編寫程序輸入山下的氣溫及山頂?shù)南鄬０胃叨?，輸出山頂?shù)臍鉁?。PrivateSubCommand1_Click() t0=Val(InputBox(“輸入山下的氣溫：")) h=Val(InputBox(“輸入山頂?shù)南鄬０胃叨龋?)) t=_______________

Print“山頂?shù)臍鉁貫椋?,t EndSubt0-h/100*0.5練習(xí)：已有的研究成果表明，海拔每升高100米，年平均氣溫降低5PrivateSubCommand1_Click()Constpi=3.14159265DimiAsInteger,jAsIntegerDimx1AsSingle,y1AsSingleDimx2AsSingle,y2AsSingleDimaAsSingleDimrAsSingleDimnodesAsIntegerPicture1.Scale(-1.5,1.5)-(1.5,-1.5)'建立坐標(biāo)系Picture1.Clsr=1nodes=15a=2*pi/nodes'弧度數(shù)Fori=1Tonodes'枚舉求(x1,y1)x1=r*Cos(a*i)y1=r*Sin(a*i)Forj=1Tonodes'枚舉求(x2,y2)Ifi<>jThenx2=r*Cos(a*j)y2=r*Sin(a*j)Picture1.Line(x1,y1)-(x2,y2),vbBlue'畫線EndIfNextjNextiEndSub注意：需要添加picture1和command1PrivateSubCommand1_Click()注意6程序代碼：PrivateSubCommand1_Click()a1=Val(Text1.Text)b1=Val(Text2.Text)c1=Val(Text3.Text)a2=Val(Text4.Text)b2=Val(Text5.Text)c2=Val(Text6.Text)

x=(c2-b2*c1)/(a2-a1*b2/b1)y=(c1-a1*x)/b1Label5.Caption="X="&xLabel6.Caption="Y="&y

EndSub程序代碼：PrivateSubCommand1_Clic7例：韓信點(diǎn)兵今有物不知其數(shù)，三三數(shù)之余二，五五數(shù)之余三，七七數(shù)之余二，問物幾何？求符合條件的最小的數(shù)。嘗試用解析法解決：xmod3=2xmod5=3xmod7=2采取從小到大一一嘗試的辦法。很難得到有效的解析式。窮舉法例：韓信點(diǎn)兵今有物不知其數(shù)，三三數(shù)之余二，五五數(shù)之余三，七七8窮舉法解韓信點(diǎn)兵問題：PrivateSubCommand1_Click()i=0Do i=i+1LoopUntil(iMod3=2)And(iMod5=3)And(iMod7=2)PrintiEndSub窮舉范圍？條件？Not((iMod3=2)And(iMod5=3)And(iMod7=2))1~x窮舉法解韓信點(diǎn)兵問題：PrivateSubCommand9窮舉法：（枚舉法、列舉法）將求解對象一一列舉出來，然后逐一加以分析、處理，并驗(yàn)證結(jié)果是否滿足給定的條件，窮舉完所有對象，問題最終得以解決。注意判斷窮舉的范圍和條件。窮舉法：（枚舉法、列舉法）將求解對象一一列舉出來，然后逐一加10練習(xí)：水仙花數(shù)水仙花是指一個三位數(shù)，它的各個位數(shù)的立方和正好等于該數(shù)本身。如：153=1^3+5^3+3^3求所有的水仙花數(shù)。分析：可能的數(shù)的范圍是_________數(shù)x(abc)需要滿足的關(guān)系式是_____________________100~999a^3+b^3+c^3=xForx=100To999a=x\100b=(xMod100)\10c=xMod10Ifx=a^3+b^3+c^3ThenPrintxEndIfNextx練習(xí)：水仙花數(shù)水仙花是指一個三位數(shù)，它的各個位數(shù)的立方和正好11水仙花數(shù)解法二：X（abc）PrivateSubCommand2_Click()Fora=1To9Forb=0To9Forc=0To9Ifa*100+b*10+c=a^3+b^3+c^3ThenPrinta*100+b*10+cEndIfNextcNextbNextaEndSub水仙花數(shù)解法二：X（abc）PrivateSubComm121、求解二元一次方程組。a1*x+b1*y=c1

a2*x+b2*y=c2x=(c2-b2*c1)/(a2-a1*b2/b1)y=(c1-a1*x)/b1達(dá)標(biāo)練習(xí)：判斷用解析法還是窮舉法。解析法x,y為實(shí)數(shù)，無法枚舉。窮舉法？1、求解二元一次方程組。a1*x+b1*y=c1a2*x132、百錢百雞問題：“公雞五文錢一只，母雞三文錢一只，小雞一文錢三只”，一百文錢買一百只雞，問買公雞、母雞、小雞各多少只？分析： x+y+z=100 5x+3y+z/3=100PrivateSubCommand1_Click()Forx=1To20Fory=1To33z=100-x-yIfx*5+y*3+z/3=100ThenPrintx,y,zEndIfNextyNextxEndSub達(dá)標(biāo)練習(xí)：判斷用解析法還是窮舉法。窮舉法2、百錢百雞問題：“公雞五文錢一只，母雞三文錢一只，小雞一文14小結(jié)：窮舉法的適用范圍求解對象是______(有限/無限)的；_______(可/不可)按規(guī)則列舉。一元二次方程求根_____(可/不可)用窮舉法。小結(jié)：窮舉法的適用范圍求解對象是______(有限/無限)的15第三章算法的程序?qū)崿F(xiàn)

一、解析法、窮舉法

信息技術(shù)組第三章算法的程序?qū)崿F(xiàn)

一、解析法、窮舉法

信息技術(shù)組16例1：某超市規(guī)定，顧客購買同種商品10件以上（含10件）可享受批發(fā)價。請設(shè)計一個收款機(jī)程序，輸入顧客所購買商品的零售價、批發(fā)價、購買數(shù)量、及付款數(shù)，計算出顧客的應(yīng)付款及找零。變量分析：數(shù)學(xué)模型：應(yīng)付款＝找零＝付款－應(yīng)付款零售價*數(shù)量，當(dāng)數(shù)量<10批發(fā)價*數(shù)量

，當(dāng)數(shù)量>=10解析表達(dá)式例1：某超市規(guī)定，顧客購買同種商品10件以上（含10件）可享17程序代碼：PrivateSubCommand1_Click()

零售價=Val(InputBox("輸入零售價：")) 批發(fā)價=Val(InputBox("輸入批發(fā)價：")) 數(shù)量=Val(InputBox("輸入購買數(shù)量：")) 付款=Val(InputBox("輸入付款數(shù)：")) If數(shù)量<10Then 應(yīng)付款=零售價*數(shù)量 Else ___________________ EndIf

_____________________ Print"應(yīng)付款：",應(yīng)付款 Print"找零",找零EndSub應(yīng)付款=批發(fā)價

*數(shù)量找零=付款-應(yīng)付款程序代碼：PrivateSubCommand1_Clic18解析法：就是在分析具體問題的基礎(chǔ)上，抽取出一個數(shù)學(xué)模型，這個數(shù)學(xué)模型能用若干解析表達(dá)式表示出來，解決了這些表達(dá)式，問題也就得以解決。用解析法解決問題的關(guān)鍵是尋找_______。解析表達(dá)式解析法：就是在分析具體問題的基礎(chǔ)上，抽取出一個數(shù)學(xué)模型，這個19練習(xí)：已有的研究成果表明，海拔每升高100米，年平均氣溫降低0.5℃。編寫程序輸入山下的氣溫及山頂?shù)南鄬０胃叨?，輸出山頂?shù)臍鉁?。PrivateSubCommand1_Click() t0=Val(InputBox(“輸入山下的氣溫：")) h=Val(InputBox(“輸入山頂?shù)南鄬０胃叨龋?)) t=_______________

Print“山頂?shù)臍鉁貫椋?,t EndSubt0-h/100*0.5練習(xí)：已有的研究成果表明，海拔每升高100米，年平均氣溫降低20PrivateSubCommand1_Click()Constpi=3.14159265DimiAsInteger,jAsIntegerDimx1AsSingle,y1AsSingleDimx2AsSingle,y2AsSingleDimaAsSingleDimrAsSingleDimnodesAsIntegerPicture1.Scale(-1.5,1.5)-(1.5,-1.5)'建立坐標(biāo)系Picture1.Clsr=1nodes=15a=2*pi/nodes'弧度數(shù)Fori=1Tonodes'枚舉求(x1,y1)x1=r*Cos(a*i)y1=r*Sin(a*i)Forj=1Tonodes'枚舉求(x2,y2)Ifi<>jThenx2=r*Cos(a*j)y2=r*Sin(a*j)Picture1.Line(x1,y1)-(x2,y2),vbBlue'畫線EndIfNextjNextiEndSub注意：需要添加picture1和command1PrivateSubCommand1_Click()注意21程序代碼：PrivateSubCommand1_Click()a1=Val(Text1.Text)b1=Val(Text2.Text)c1=Val(Text3.Text)a2=Val(Text4.Text)b2=Val(Text5.Text)c2=Val(Text6.Text)

x=(c2-b2*c1)/(a2-a1*b2/b1)y=(c1-a1*x)/b1Label5.Caption="X="&xLabel6.Caption="Y="&y

EndSub程序代碼：PrivateSubCommand1_Clic22例：韓信點(diǎn)兵今有物不知其數(shù)，三三數(shù)之余二，五五數(shù)之余三，七七數(shù)之余二，問物幾何？求符合條件的最小的數(shù)。嘗試用解析法解決：xmod3=2xmod5=3xmod7=2采取從小到大一一嘗試的辦法。很難得到有效的解析式。窮舉法例：韓信點(diǎn)兵今有物不知其數(shù)，三三數(shù)之余二，五五數(shù)之余三，七七23窮舉法解韓信點(diǎn)兵問題：PrivateSubCommand1_Click()i=0Do i=i+1LoopUntil(iMod3=2)And(iMod5=3)And(iMod7=2)PrintiEndSub窮舉范圍？條件？Not((iMod3=2)And(iMod5=3)And(iMod7=2))1~x窮舉法解韓信點(diǎn)兵問題：PrivateSubCommand24窮舉法：（枚舉法、列舉法）將求解對象一一列舉出來，然后逐一加以分析、處理，并驗(yàn)證結(jié)果是否滿足給定的條件，窮舉完所有對象，問題最終得以解決。注意判斷窮舉的范圍和條件。窮舉法：（枚舉法、列舉法）將求解對象一一列舉出來，然后逐一加25練習(xí)：水仙花數(shù)水仙花是指一個三位數(shù)，它的各個位數(shù)的立方和正好等于該數(shù)本身。如：153=1^3+5^3+3^3求所有的水仙花數(shù)。分析：可能的數(shù)的范圍是_________數(shù)x(abc)需要滿足的關(guān)系式是_____________________100~999a^3+b^3+c^3=xForx=100To999a=x\100b=(xMod100)\10c=xMod10Ifx=a^3+b^3+c^3ThenPrintxEndIfNextx練習(xí)：水仙花數(shù)水仙花是指一個三位數(shù)，它的各個位數(shù)的立方和正好26水仙花數(shù)解法二：X（abc）PrivateSubCommand2_Click()Fora=1To9Forb=0To9Forc=0To9Ifa*100+b*10+c=a^3+b^3+c^3Th