寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題

1、寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題 電腦(C39)1前言用電腦編寫(xiě)程序解決日常生活中的問(wèn)題，從設(shè)計(jì)程序中，加深了解和認(rèn)識(shí)電腦的運(yùn)作過(guò)程，理解電腦的長(zhǎng)處和不足，從而使同學(xué)們將來(lái)使用或設(shè)計(jì)電腦程序等方面更得心應(yīng)手。2問(wèn)題討論從提出一些實(shí)際生活中碰到的問(wèn)題出發(fā)誘發(fā)學(xué)生使用電腦編程解決問(wèn)題，增加學(xué)生學(xué)習(xí)電腦編寫(xiě)程序的興趣。3小組活動(dòng)借助形式，激發(fā)學(xué)生的創(chuàng)造能力、通過(guò)調(diào)試和比較各組所編寫(xiě)的程序，更正學(xué)生一些錯(cuò)誤的編程概念，把當(dāng)中較好的方法和思路向各組推廣，最後再把前人所設(shè)計(jì)的方法作介紹，集思廣益。大大增強(qiáng)了學(xué)生學(xué)習(xí)電腦程序設(shè)計(jì)的興趣。4例一收銀機(jī)程序說(shuō)明：寫(xiě)程式模擬數(shù)銀機(jī)，由鍵盤(pán)輸入商品個(gè)數(shù)，再輸入每種商品的價(jià)

2、錢(qián)，求出所有商品的總和。 5例一收銀機(jī)程序Var j,n:integer;cost,total:real;Begin Total:=0;Write(請(qǐng)輸入商品的個(gè)數(shù):);Readln(n);For j:=1 to n do BeginWrite(你現(xiàn)正輸入第,j,件貨品之價(jià)格:);Readln(cost);Total:=total+cost;End;Writeln(你總共購(gòu)入了,n,件貨品);Writeln(總共,total:7:2,元);End.6例一討論收銀機(jī)程序改進(jìn)提示：此程序還沒(méi)有到達(dá)實(shí)際階段，一般收銀機(jī)的貨品數(shù)量是不用輸入的，而是自動(dòng)計(jì)算的，在此方要可以作一些改進(jìn)。試加上一些特殊條件

3、，或一些特殊折扣的計(jì)算方法。7例二百錢(qián)百鷄問(wèn)題說(shuō)明：某養(yǎng)雞場(chǎng)出售新鮮雞隻其售價(jià)為公鷄3元/隻，母鷄5元/隻，小鷄0.5元/隻，請(qǐng)找出用100元買(mǎi)100隻鷄的方法。8例二百錢(qián)百鷄問(wèn)題Var chicken,hen,cock:integer;BeginFor chicken:=0 to 100*2 doFor hen:=0 to 100 doFor cock:=0 to 100 doIf chicken*0.5+hen*5+cock*3=100 thenbeginWriteln(chicken:,chicken);Writeln(hen:,hen);Writeln(cock:cock);Write

4、ln(-);End;End.9例二討論百錢(qián)百鷄問(wèn)題改進(jìn)提示：此程序隱藏著大量多餘的運(yùn)算步驟，試改進(jìn)之。試?yán)么顺绦虻男问?，解決其他類(lèi)似的問(wèn)題。(例：現(xiàn)有雞、狗、蜘蛛這三種生物，且它們的腳的數(shù)目之和剛好是100隻腳，求出雞、狗、蜘蛛各有多少隻，並列出所有可能的情況。)10例三一元二次方程求解說(shuō)明：輸入一元二次方程的三個(gè)系數(shù)，求出此方程的根。11例三一元二次方程求解Var a,b,c:integer;Delta:real;BeginWriteln(請(qǐng)輸入一元二次方程的三個(gè)系數(shù)：);Write(a=);Readln(a);Write(b=);Readln(b);Write(c=);Readln(c)

5、;Delta:=sqr(b)-4*a*c;If delta0 then Writeln(此方程無(wú)解:)ElseIf delta=0 thenWriteln(此方程的解為,-b/(2*a)ElseBeginWriteln(此方程的解1為,(-b+sqrt(delta)/(2*a);Writeln(此方程的解2為,(-b-sqrt(delta)/(2*a);End;End.12例三討論一元二次方程求解改進(jìn)提示：試將此方程的系數(shù)改為實(shí)數(shù)型式。此程序?yàn)橐恍?shù)學(xué)方程電算化的問(wèn)題，可以嘗試用電腦解法其他在數(shù)、理、化科目上遇到的問(wèn)題。13思考練習(xí)題已知本金是$1200，利率是13%，25日後的本利和是多少呢？已知攝氏溫度與華氏溫度的換算關(guān)系式C=5/9(F-32)編寫(xiě)程式求華氏溫度為30,70,100,150度時(shí)的攝氏溫度。對(duì)一批貨物徵收稅金，價(jià)格1萬(wàn)元或以上的貨物徵稅5%，對(duì)10000元以下5000元或以上的貨物徵稅3%，對(duì)5000元以下1000元或以上的貨物徵稅2%，1000元以下免稅。編