pascal語(yǔ)言程序設(shè)計(jì)教案-分支結(jié)構(gòu)編程練習(xí)

1、 現(xiàn)實(shí)生活中，事物的發(fā)展總是按照一定順序來(lái)進(jìn)行的，這種順序反映到程序設(shè)計(jì)上，叫做順序結(jié)構(gòu)。 但是，有的時(shí)候，事物的發(fā)展卻不是一帆風(fēng)順的，會(huì)有各種意外發(fā)生，在解決這類(lèi)問(wèn)題的時(shí)候，我們要盡量把各種情況都考慮進(jìn)去，針對(duì)不同的情況采取不同的措施，這就出現(xiàn)了分支的情況。這種現(xiàn)象反映到程序設(shè)計(jì)上，就叫做分支結(jié)構(gòu)。2.行李托運(yùn)問(wèn)題鐵路托運(yùn)：物品實(shí)重不超過(guò)50kg的，托運(yùn)費(fèi)按0.15元/kg計(jì)算，超過(guò)50kg的，超過(guò)部分按0.1元/kg加收運(yùn)費(fèi)，試用流程圖表示計(jì)費(fèi)過(guò)程。開(kāi)始輸入物品實(shí)重WW=50?計(jì)算運(yùn)費(fèi)S=W0.15+（W-50）0.1輸出運(yùn)費(fèi)S結(jié)束是否Program exa01;Var w,s:real;

2、BeginWriteln(please enter ? Kg:);Readln(w);If w=0？輸出：“It is a zhengshu.”結(jié)束是否輸出：“It is a fushu.”練一練：超市自動(dòng)計(jì)費(fèi)程序某超市為了促銷(xiāo)，規(guī)定：購(gòu)物不足50元的按原價(jià)付款，超過(guò)50元的，超過(guò)部分按九折付款。請(qǐng)幫超市設(shè)計(jì)一個(gè)程序完成自動(dòng)計(jì)費(fèi)，寫(xiě)出它的程序流程圖。開(kāi)始輸入購(gòu)物金額AA=0？輸出：“It is a zhengshu.”結(jié)束是否輸出：“It is a fushu.”練一練：超市自動(dòng)計(jì)費(fèi)程序某超市為了促銷(xiāo)，規(guī)定：購(gòu)物不足50元的按原價(jià)付款，超過(guò)50元的，超過(guò)部分按九折付款。請(qǐng)幫超市設(shè)計(jì)一個(gè)程序完成自動(dòng)計(jì)費(fèi)，寫(xiě)出它的程序流程圖。開(kāi)始輸入購(gòu)物金額AA50？需付款額M=A結(jié)束是否需付款額為M=50+（A-50）*0.9例：行李托運(yùn)問(wèn)題鐵路托：物品實(shí)重不超過(guò)50kg的，托運(yùn)費(fèi)按0.15元/kg計(jì)算，超過(guò)50kg的，超過(guò)部分按0.1元/kg加收運(yùn)費(fèi)，試用流程圖表示計(jì)費(fèi)過(guò)程。開(kāi)始輸入物品實(shí)重WW=50?計(jì)算