寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題_第1頁(yè)
寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題_第2頁(yè)
寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題_第3頁(yè)
寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題_第4頁(yè)
寫(xiě)程序解決現(xiàn)實(shí)生活中的問(wèn)題_第5頁(yè)
已閱讀5頁(yè),還剩10頁(yè)未讀, 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎ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、錢,求出所有商品的總和。 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例二百錢百鷄問(wèn)題說(shuō)明:某養(yǎng)雞場(chǎng)出售新鮮雞隻其售價(jià)為公鷄3元/隻,母鷄5元/隻,小鷄0.5元/隻,請(qǐng)找出用100元買100隻鷄的方法。8例二百錢百鷄問(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例二討論百錢百鷄問(wèn)題改進(jìn)提示:此程序隱藏著大量多餘的運(yùn)算步驟,試改進(jìn)之。試?yán)么顺绦虻男问?,解決其他類似的問(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元以下免稅。編

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論