蘇科版初中信息技術(shù)選修《循環(huán)結(jié)構(gòu)》ppt課件1-全文預(yù)覽
【正文】 x mod 2 1 then yes:=false。 yes : boolean。當(dāng)排成每行 7人時(shí) ,正好不多。 writeln(m)。 repeat //輾轉(zhuǎn)相除法 r : =m mod n。程序采用 repeatuntil循環(huán)實(shí)現(xiàn)。 ② repeatuntil是一個(gè)整體，它是一個(gè)（構(gòu)造型）語(yǔ)句，不要誤認(rèn)為 repeat是一個(gè)語(yǔ)句， until是另一個(gè)語(yǔ)句。 : 語(yǔ)句 n。求前 30 項(xiàng) ,并以每行 5個(gè)數(shù)的格式輸出。 【 上機(jī)練習(xí) 】 用 WHILE循環(huán)完成如下 3題： ①求 s=1+2+3+4+…+10 ② 求 s=1+1/2+1/3+…+1/100 ③ 計(jì)算 n！，其中 n由鍵盤輸入。 pai : =pai*4。 n : =n+2。 t : =1。 程序如下 ： Program ex4_12。,b:8)。 r:=a mod b。 b:=n。Input m,n:39。 ①求 m/n的余數(shù) r. ② 若 r=0,則 n為最大公約數(shù) .若 r≠0,執(zhí)行第③步 . ③ 將 n的值放在 m中 ,將 r的值放在 n中 . ④ 返回重新執(zhí)行第①步。,n)。 //項(xiàng)數(shù)加 1 s : =s+1/n。 n : integer。從數(shù)學(xué)角度，我們很難計(jì)算這個(gè) n的值。 當(dāng)布爾表達(dá)式成立時(shí)，執(zhí)行 do后面的語(yǔ)句 (循環(huán)體 )，當(dāng)布爾表達(dá)式的值為false時(shí)，才結(jié)束循環(huán)，轉(zhuǎn)去執(zhí)行 while語(yǔ)句的下一條語(yǔ)句，故又稱此語(yǔ)句為“當(dāng)”語(yǔ)句或“當(dāng)型循環(huán)”。 ② 執(zhí)行循環(huán)體語(yǔ)句 (do后面的語(yǔ)句 )。 求菲波拉契數(shù)列 a0,a1,a2,……a 20。 end. 運(yùn)行結(jié)果： 輸入： 1000 輸出： 輸入： 10000 輸出： 【 上機(jī)練習(xí) 】 求 12+22+32+…+1002 求 s=1+1/2+1/3+…+1/100 計(jì)算 100之內(nèi)所有的奇數(shù)之和。 begin readln(n)。但是， i作為循環(huán)控制變量參加循環(huán)體的運(yùn)算，它是整型數(shù)，那么當(dāng) i=182時(shí)， i*i已經(jīng)超過(guò)了正整數(shù) 32767的范圍，在 Pascal系統(tǒng)里就把它變?yōu)?65536+i*i的整型數(shù)進(jìn)行處理，當(dāng) i=256時(shí)， 65536+i*i正好等于零，從面產(chǎn)生以零作除數(shù)的編譯錯(cuò)誤，所以我們?cè)诔绦蚶飸?yīng)該把 i定義為長(zhǎng)整型，這樣可以輸入更大的 n(不能大于 46341，等于 65536時(shí)，也會(huì)同樣出現(xiàn)被 0除的溢出錯(cuò)誤 )。 【 分析 】 設(shè)符合條件的四位數(shù)為 N，它應(yīng)當(dāng)是一個(gè)完全平方數(shù)，用 (a*a)表示。 end。 begin for x := 10 to 99 do begin a := x div 10。 end. 運(yùn)行結(jié)果： 233 例 一個(gè)兩位數(shù) x，將它的個(gè)位數(shù)字與十位數(shù)字對(duì)調(diào)后得到一個(gè)新數(shù) y，此時(shí) y恰好比 x大 36，請(qǐng)編程求出所有這樣的兩位數(shù)。 prevx : =lastx。 Var i,lastx,prevx,x : integer。在程序中用同一個(gè)變量 s來(lái)存儲(chǔ)每一次推出來(lái)的值，由前一個(gè) s推出后一個(gè) s是遞推。例如，為求 5!，應(yīng)先知道 4!的值，然后再乘以 5；為求6!必先求出 5！。 writeln(s)。 var n,i : integer； // i為循環(huán)變量 s : longint。a39。 do write(k)。 begin for k : =39。 end. 運(yùn)行結(jié)果： 5050 只要對(duì)程序稍加修改就可以計(jì)算出以下算式的值： s=1+1/2+1/3+…+1/100 s=12+22+32+…+1002 s=2+4+6+…+100 等等。 var s,i : integer。 begin for i:=1 to 100 do if i mod 2=0 then write(i:5)。 ⑤ for語(yǔ)句中的初值、終值都可以是順序類型的常量、變量、表達(dá)式。如： for i : =1 to 10 do begin i : =2*i+1。 ③ 循環(huán)體可以是一個(gè)基本語(yǔ)句，也可以是一個(gè)復(fù)合語(yǔ)句。如何編程呢？ 【 例 】 S： =0； FOR I ： = 1 TO 10 DO S ： = S + I； Writeln（‘ S =’， S）； For語(yǔ)句執(zhí)行過(guò)程 ① 先將初值賦給左邊的變量（稱為循環(huán)變量）； ② 判斷循環(huán)變量的值是否“等于”終值，如已等于終值，則下次不再執(zhí)行（本次是最后一次執(zhí)行，循環(huán)變量的值也不更改），則跳到步驟⑥； ③ 如果小于等于終值，則執(zhí)行 do后面的那個(gè)語(yǔ)句（稱為循環(huán)體）； ④ 循環(huán)變量遞增（對(duì) to）或遞減（對(duì) downto)１； ⑤ 返回步驟②； ⑥ 循環(huán)結(jié)束，執(zhí)行 for循環(huán)下面的一個(gè)語(yǔ)句。 //遞增型循環(huán) for 控制變量 :=表達(dá)式 1 downto 表達(dá)式 2 do 語(yǔ)句 。它們分別為 FOR循環(huán) 、當(dāng)循環(huán) 和 直到循環(huán) 。在 Pascal語(yǔ)言中，循環(huán)結(jié)構(gòu)程序通常由三種的循環(huán)語(yǔ)句來(lái)實(shí)現(xiàn)。 第一節(jié) 循環(huán)語(yǔ)句（ FOR語(yǔ)句） for語(yǔ)句的一般格式 for 控制變量 :=表達(dá)式 1 to 表達(dá)式 2 do 語(yǔ)句 。 循環(huán)的語(yǔ)句格式： FOR 變量名 := 初值 TO 終值 DO 語(yǔ)句； 求 1+2+3+……+N 的和。 ② 循環(huán)變量的值遞增或遞減的規(guī)律是：選用 to則為遞增；選用downto則遞減。所以禁止在循環(huán)體中隨意修改控制變量的值。 以上 for循環(huán)是一個(gè)死循環(huán)， i永遠(yuǎn)等于 2，不可能達(dá)到終止值 10。 var i:integer。 程序如下： Program ex4_2。 writeln(s)。 var k : char。z39。 downto 39。 end. 例 N的階乘是指 1到 N的累乘，即 N！ =1*2*3*…*N ，輸入一個(gè)數(shù)，求這個(gè)數(shù)的階乘？ 程序如下 ： Program ex4_4。 //這條語(yǔ)句少了，選手們思考一 下，會(huì)出現(xiàn)什么現(xiàn)象 ? for i := 2 to n do //從 2到 n累乘到 s中 s := s*i。所謂遞推算法是指在一個(gè)數(shù)的序列值中，下一項(xiàng)的值在前一項(xiàng)的值的基礎(chǔ)上推算出來(lái)的，即下一項(xiàng)對(duì)前一項(xiàng)有某種依賴關(guān)系。只要找出遞推關(guān)系，就可以由循環(huán)來(lái)處理，一項(xiàng)一項(xiàng)地推算出來(lái)以后
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1