Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc Bµi thùc hµnh - Sư dơng lƯnh ®iỊu kiƯn if… then Ngµy so¹n: 2/1/2011 I/ Mơc tiªu cÇn ®¹t: * KiÕn thøc: - ViÕt c©u lƯnh if…then ch¬ng tr×nh - RÌn kü n¨ng ban ®Çu vỊ ®äc c¸c ch¬ng tr×nh ®¬n gi¶n vµ hiĨu ®ỵc ý nghÜa cđa tht to¸n sư dơng ch¬ng tr×nh * Kü n¨ng: - ViÕt ®óng c©u lƯnh rÏ nh¸nh d¹ng khut, rÏ nh¸nh d¹ng ®Çy ®đ - BiÕt sư dơng ®óng vµ cã hiƯu qu¶ c©u lƯnh rÏ nh¸nh II/ Ph¬ng ph¸p: Thut tr×nh, vÊn ®¸p, th¶o ln… III/ Chn bÞ: Chn bÞ cđa GV: Chia nhãm HS, phßng m¸y, … Chn bÞ cđa HS: §äc tríc bµi ë nhµ IV/ TiÕn tr×nh lªn líp: ỉn ®Þnh tỉ chøc : Ngµy d¹y Líp TiÕt HS v¾ng NhËn xÐt H§ D¹y 8A1 8A2 8A3 8A4 8A5 KiĨm tra bµi cò D¹y bµi míi Ho¹t ®éng cđa GV vµ HS Néi dung Gv yªu cÇu HS nh¾c l¹i cÊu tróc + D¹ng thiÕu: rÏ nh¸nh d¹ng thiÕu vµ d¹ng ®Çy NÕu < ®iỊu kiƯn> th× If < ®iỊu kiƯn> then < c©u lƯnh> ®đ Pascal + D¹ng ®Çy ®đ: NÕu th× nÕu kh«ng th× if then else Bµi 1: ViÕt ch¬ng tr×nh nhËp sè nguyªn a vµ b - Gv yªu cÇu HS ®äc ®Ị bµi kh¸c tõ bµn phÝm vµ in hai sè ®ã mµn h×nh (SGK – T52) theo thø tù kh«ng gi¶m HS: ®äc bµi a) M« t¶ tht to¸n ®Ĩ gi¶i bµi to¸n Bíc 1: NhËp sè nguyªn a, b tõ bµn phÝm Bíc 2: NÕu a ≤ th× hiĨn thÞ mµn h×nh gi¸ trÞ cđa GV: H·y m« t¶ tht to¸n ®Ĩ gi¶i bµi to¸n ®· cho (tham kh¶o biÕn a tríc rßi ®Õn gi¸ trÞ cđa biÕn b Bíc 3: NÕu b Open chän Aicaohon.Pas -> Open Aicaohon.Pas NhÊn Alt+ F9 ®Ĩ dÞch vµ sưa lçi gâ, nÕu cã HS: Thùc hiƯn trªn m¸y + KÕt qu¶ cđa bé d÷ liƯu (1.5, 1.6)) lµ: Trang cao GV: H·y dÞch vµ sưa lçi nÕu cã h¬n Long GV: H·y ch¹y ch¬ng tr×nh víi bé + KÕt qu¶ cđa bé d÷ liƯu (1.6, 1.5) lµ: d÷ liƯu (1.5, 1.6) vµ (1.6, 1.5) vµ Long cao h¬n Trang (1.6, 1.6) Hai ban cao bang HS: C¸c nhãm thùc hiƯn trªn m¸y + KÕt qu¶ cđa bé d÷ liƯu (1.6, 1.6) lµ: Trang cao vµ trao ®ỉi kÕt qu¶ cho h¬n Long GV: Em h·y quan s¸t c¸c kÕt qu¶ NhËn xÐt: + KÕt qu¶ cđa bé d÷ liƯu (1.5, 1.6) lµ Trang cao nhËn ®ỵc vµ nªu nhËn xÐt HS: C¸c nhãm quan s¸t kÕt qu¶ vµ h¬n Long ( ®óng) + KÕt qu¶ cđa bé d÷ liƯu (1.6, 1.6))lµ: Trang cao ®a nhËn xÐt Gv: Em h·y t×m chç cha ®óng h¬n Long ( ®óng) + KÕt qu¶ cđa bé d÷ liƯu (1.6, 1.5) lµ: ch¬ng tr×nh vµ sưa l¹i ch¬ng tr×nh Long cao h¬n Trang ®Ĩ cã kÕt qu¶ ®óng: ChØ in mµn Hai ban cao bang (Sai) h×nh mét th«ng b¸o kÕt qu¶ * C¸ch sưa: HS: C¸c nhãm trao ®ỉi vµ t×m C¸ch 1: c¸ch sưa if Long>Trang then Writeln (‘Ban Long cao h¬n’); Lu ý: Trong ®o¹n ch¬ng tr×nh tham if Long=Trang then Writeln (‘Hai ban cao bang kh¶o ë c¸ch chóng ta ®· sư dơng nhau’); if Long< Trang then Writeln (‘Ban Trang cao hai c©u lƯnh if…then lång nhau: hon’); if then C¸ch 2: else if then Trang then Writeln (‘Ban Long cao h¬n’) lƯnh2> else else Ho¹t ®éng 2: T×m hiĨu bµi tËp 3: if Longc, b+c>a vµ c+a> c©u lƯnh ch¬ng tr×nh, so¹n, dÞch vµ ch¹y ch¬ng tr×nh vãi c¸c sè b Program Ba_canh_tam_giac; t ý Uses crt; HS: C¸c nhãm thùc hiƯn trªn m¸y Var a,b,c: Real; GV: Quan sat vµ híng dÉn HS GV híng dÉn HS c¸ch biĨu diƠn ba Begin Clrscr;Write(‘Nhap ba so a, b, c); Readln (a, b, c); ®iỊu kiƯn Pascal If (a+b> c) and ( b+c>a) and (c+a>b) then (a+b> c) and ( b+c>a) and (c+a>b) GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc GV: Sư dơng phÐp quan hƯ and lµ ®Ĩ ®¶m b¶o ®iỊu kiƯn a+b>c, b+c>a vµ c+a> b ®ång thêi tháa m·n HS ghi bµi Writeln(‘ a, b va c la c¹nh cua tam giac’) else Writeln(‘ a, b va c kh«ng la c¹nh cua tam giac’); Readln; End * Lu ý: Trong ch¬ng tr×nh trªn chóng ta sư dơng tõ kho¸ and ®Ĩ kÕt hỵp nhiỊu phÐp so s¸nh ®¬n gi¶n thµnh mét phÐp so s¸nh phøc hỵp Gi¸ trÞ cđa phÐp so s¸nh nµy lµ ®óng vµ chØ tÊt c¶ c¸c phÐp so s¸nh ®¬n gi¶n ®Ịu cã gi¸ trÞ ®óng Ngỵc l¹i, chØ cÇn mét phÐp so s¸nh cã gi¸ trÞ sai th× nã cã gi¸ trÞ sai V/ Cđng cè bµi: Gv yªu cÇu HS ®äc phÇn tỉng kÕt BTVN: 1) ViÕt ch¬ng tr×nh nhËp vµo mét sè tù nhiªn bÊt kú, b¸o mµn h×nh sè nµy lµ ch½n hay lÏ 1) ViÕt ch¬ng tr×nh nhËp vµo sè thùc bÊt kú, b¸o mµn h×nh gi¸ trÞ lín nhÊt ba sè ®ã./ Nam §Þnh ngµy…/ /2011 BGH ký dut TiÕt 39: C©u lƯnh lỈp Ngµy so¹n: 5/1/2011 I/ Mơc tiªu cÇn ®¹t: * KiÕn thøc: - BiÕt nhu cÇu cÇn cã cÊu tróc lỈp ng«n ng÷ lËp tr×nh - BiÕt ng«n ng÷ lËp tr×nh dïng cÊu tróc lỈp ®Ĩ chØ dÉn m¸y tÝnh thùc hiƯn lỈp ®i lỈp l¹i c«ng viƯc nµo ®ã mét sè lÇn - HiĨu ho¹t ®éng cđa c©u lƯnh lỈp víi sè lÇn biÕt tríc For…to…do Pascal - ViÕt ®óng ®ỵc lƯnh for…to…do… mét sè t×nh hng ®¬n gi¶n - BiÕt lƯnh ghÐp Pascal * Kü n¨ng: - ViÕt ®óng c©u lƯnh lỈp For…To…Do - BiÕt sư dơng ®óng vµ cã hiƯu qu¶ c©u lƯnh lỈp * Th¸i ®é: - Nghiªm tóc, tÝch cùc, vui vỴ II/ Ph¬ng ph¸p: Thut tr×nh, vÊn ®¸p, th¶o ln… III/ Ho¹t ®éng d¹y häc: ỉn ®Þnh tỉ chøc Ngµy d¹y Líp TiÕt HS v¾ng NhËn xÐt H§ D¹y 8A1 8A2 8A3 8A4 8A5 KiĨm tra bµi cò H·y cho biÕt c©u lƯnh ®iỊu kiƯn d¹ng thiÕu vµ c©u lƯnh ®iỊu kiƯn d¹ng ®đ? (GV gäi HS lªn b¶ng tr×nh bµy, gäi HS kh¸c nhËn xÐt) D¹y bµi míi Ho¹t ®éng cđa GV Ho¹t ®éng cđa HS Ho¹t ®éng 1: T×m hiĨu c¸c c«ng viƯc ph¶i ®ỵc C¸c c«ng viƯc ph¶i ®ỵc thùc hiƯn nhiỊu lÇn thùc hiƯn nhiỊu lÇn ?H·y nªu sè vÝ dơ ®êi sèng thùc tiƠn cã VD: TiÕng chu«ng ®ång hå b¸o thøc GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc tÝnh chÊt lỈp ®i lỈp l¹i? em dËy mçi s¸ng, c¸c ngµy tn bi s¸ng em ®Õn trêng vµ bi chiỊu * Khi viÕt ch¬ng tr×nh m¸y tÝnh còng vËy §Ĩ chØ trë vỊ nhµ,… dÉn cho m¸y tÝnh thùc hiƯn ®óng c«ng viƯc, VÝ dơ: ViÕt ch¬ng tr×nh Pascal ®Ĩ in nhiỊu trêng hỵp ta còng cÇn ph¶i viÕt lỈp lêi chµo cđa c¸c b¹n líp em l¹i nhiỊu c©u lƯnh thùc hiƯn mét phÐp tÝnh nhÊt Nh vËy viÕt mét ch¬ng tr×nh Pascal ®Þnh cho phÐp viƯc lỈp ®i lỈp l¹i viƯc nhËp tªn vµ hiĨn thÞ mµn h×nh lêi chµo Ho¹t ®éng 2: T×m hiĨu c©u lƯnh lỈp … mét lƯnh thay cho nhiỊu lƯnh C©u lƯnh lỈp … mét lƯnh thay cho VÝ dơ1: VÏ ba h×nh vu«ng cã c¹nh ®¬n vÞ nhiỊu lƯnh (H33) Mçi h×nh vu«ng lµ ¶nh dÞch chun cđa *ViƯc vÏ h×nh vu«ng ®ỵc thùc hiƯn h×nh bªn tr¸i nã mét kho¶ng c¸ch ®¬n vÞ ?ViƯc vÏ h×nh vu«ng ®ỵc thùc hiƯn b»ng tht b»ng tht to¸n nh sau: B1: VÏ h×nh vu«ng to¸n nh thÕ nµo? B2: NÕu sè h×nh vu«ng ®· vÏ ®ỵc bÐ h¬n 3, di chun bót vÏ vỊ bªn ph¶i ®¬n vÞ vµ trë l¹i bíc 1; ngỵc l¹i kÕt thóc tht to¸n ?H·y nªu tht to¸n vÏ h×nh vu«ng? VÝ dơ 2: TÝnh tỉng cđa 100 sè tù nhiªn ®Çu tiªn * Tht to¸n vÏ h×nh vu«ng S= 1+2+3+…+100 Ho¹t ®éng chÝnh gi¶i bµi to¸n trªn lµ thùc hiƯn phÐp céng * C¸ch m« t¶ c¸c ho¹t ®éng lỈp tht to¸n nh c¸c vÝ vơ trªn ®ỵc gäi lµ c¸c cÊu tróc lỈp * CÊu tróc lỈp ®ỵc sư dơng ®Ĩ chØ thÞ ? CÊu tróc lỈp dïng ®Ĩ lµm g×? cho m¸y tÝnh thùc hiƯn lỈp l¹i mét * Mäi ng«n ng÷ lËp tr×nh ®Ịu cã c¸c c©u lƯnh ho¹t ®éng nµo ®ã cho ®Õn mét ®iỊu kiƯn nµo ®ã ®ỵc tho· m·n lỈp thĨ hiƯn cÊu tróc lỈp Ho¹t ®éng 3: T×m hiĨu vÝ dơ vỊ c©u lƯnh lỈp VÝ dơ vỊ c©u lƯnh lỈp Ng«n ng÷ Pascal thĨ hiƯn cÊu tróc lỈp víi sè lÇn lỈp biÕt tríc b»ng c©u lƯnh L¾ng nghe vµ ghi chÐp For := to Do ; Trong ®ã: For, to, lµ c¸c tõ kho¸; biÕn ®Õm cã kiĨu nguyªn; Gi¸ trÞ ®Çu gi¸ trÞ ci lµ c¸c gi¸ trÞ nguyªn C©u lƯnh lỈp sÏ thùc hiƯn c©u lƯnh nhiỊu lÇn, mçi lÇn, mçi lÇn lµ mét vßng lỈp Sè vßng lỈp lµ biÕt tríc vµ b»ng: gi¸ trÞ ci - gi¸ trÞ ®Çu +1 Khi thùc hiƯn, ban ®Çu biÕn ®Õm sÏ nhËn gi¸ trÞ lµ gi¸ trÞ ®Çu, sau mçi vßng lỈp, sau mçi vßnglỈp biÕn ®Õm ®ỵc tù ®éng t¨ng thªm mét ®¬n vÞ cho ®Õn b»ng gi¸ trÞ ci VÝ dơ 3: ViÕt ch¬ng tr×nh in mµn h×nh thø tù lÇn lỈp VÝ dơ 4: ViÕt ch¬ng tr×nh ghi nhËn c¸c vÞ trÝ cđa mét qu¶ trøng r¬i tõ trªn cao xng, ta cã thĨ lỈp l¹i lƯnh trªn nhiỊu lÇn Lu ý: Trong vÝ du c¸c c©u lƯnh ®¬n gi¶n Writeln (‘o’) vµ delay (100) ®ỵc ®Ỉt hai tõ kho¸ begin vµ end ®Ĩ t¹o thµnh c©u lƯnh ghÐp Pascal V/ Cđng cè bµi: §äc ghi nhí, lµm bµi tËp 1, SGK TiÕt 40: C©u lƯnh lỈp (tiÕp theo) Ho¹t ®éng cđa GV Ho¹t ®éng cđa HS Ho¹t ®éng 1: TÝnh tỉng vµ tÝch b»ng c©u lƯnh Program Tinh_tong; lỈp VÝ dơ (SGK): ViÕt ch¬ng tr×nh tÝnh tỉng cđa N sè var n,i: integer; GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng tù nhiªn ®Çu tiªn ®ỵc nhËp vµo tõ bµn phÝm GV gỵi ý: Sư dơng tht to¸n ë vÝ dơ bµi * Do tỉng lµ mét sè rÊt lín nªn ta sư dơng mét kiĨu d÷ liƯu míi cđa Pascal lµ Longint (lu sè nguyªn ph¹m vi 2-31 ®Õn 231 -1) GV yªu cÇu HS viÕt vµo giÊy nh¸p vµ lªn b¶ng tr×nh bµy GV gäi HS nhËn xÐt VÝ dơ 6: ViÕt ch¬ng tr×nh tÝnh N! (N! = 1.2.3…n) Víi N lµ sè tù nhiªn ®ỵc nhËp vµo tõ bµn phÝm Gv gỵi ý: Ch¬ng tr×nh sư dơng mét c©u lƯnh lỈp For …do GV chia nhãm HS, c¸c nhãm th¶o ln vµ lªn b¶ng tr×nh bµy Ho¹t ®éng 2: Ch÷a mét sè bµi tËp SGK Bµi 2: H·y cho biÕt t¸c dơng cđa c©u lƯnh lỈp víi sè lÇn biÕt tríc? GV cho HS th¶o ln vµ rót kÕt ln Bµi 4: Sau thùc hiƯn ®o¹n ch¬ng tr×nh sau, gi¸ trÞ cđa biÕn J b»ng bao nhiªu? J: = 0; For i:= to J: = J+2; ? LƯnh lỈp trªn thùc hiƯn bao nhiªu vßng lỈp? Mçi vßng lỈp J t¨ng thªm bao nhiªu ®¬n vÞ? Bai 5: SGK C¸c c©u lƯnh Pascal sau cã hỵp lƯ hay kh«ng, v× sao? Gv chia HS nhãm mçi nhãm lµm mét c©u cư ®¹i diƯn tr¶ lêi c©u hái Bµi 6: H·y m« t¶ tht to¸n tÝnh tỉng A= 1 1 + + + n(n + 2) 1.3 2.4 3.5 Tht to¸n ®ỵc m« t¶ nh sau: Bíc 1: G¸n A ← 0, i ← Bíc 2: A ← i (i + 2) Gi¸o ¸n Tin häc S: Longint; Begin Write (‘ Nhap so n=’); Readln(n); S:=0; For i:= to 100 S:= S+i; Writeln(‘Tong cua‘, N,’ so tu nhien dau tien S = ‘, S); Readln; End HS l¾ng nghe C¸c nhãm th¶o ln vµ lªn b¶ng tr×nh bµy Bµi 2: C©u lƯnh lỈp víi sè lÇn biÕt tríc cã t¸c dơng lµm ®¬n gi¶n vµ gi¶m nhĐ c«ng søc cđa ngêi viÕt ch¬ng tr×nh Bµi 4: LƯnh lỈp trªn thùc hiƯn vßng lỈp, mçi lÇn J t¨ng thªm ®¬n vÞ VËy kÕt thóc vßng lỈp J cã gi¸ trÞ12 Bµi 5: a) Kh«ng hỵp lƯ, gi¸ trÞ ®Çu ph¶i nhá h¬n gi¸ trÞ ci b) Kh«ng hỵp lƯ, gi¸ tÞ ®Çu vµ gi¸ trÞ ci ph¶i lµ sè nguyªn c) Kh«ng hỵp lƯ, thiÕu dÊu : g¸n gi¸ trÞ ®Çu d) Hỵp lƯ, nhiªn nÕu ta mn lỈp l¹i c©u lƯnh Writeln (‘A’) mêi lµn th× kh«ng hỵp lƯ thõa dÊu chÊm phÈy thø nhÊt e) Kh«ng hỵp lƯ v× biÕn x ®ỵc khai b¸o kiĨu sè thùc Bíc 3: i ← i+1 L¾ng nghe vµ ghi chÐp Bíc 4: NÕu i ≤ n, quay l¹i bíc Bíc 5: Ghi kÕt qu¶ A vµ kÕt thóc tht to¸n V/ Cđng cè bµi: GV yªu cÇu ®äc l¹i phÇn ghi nhí SGK Híng dÉn vỊ nhµ: Lµm tríc c¸c bµi ë bµi thøc hµnh ®Ĩ tiÕt sau thùc hµnh Nam §Þnh ngµy…/ /2011 BGH ký dut TiÕt 41 - 42: Bµi thùc hµnh Sư dơng lƯnh lỈp for To Ngµy so¹n: 12/01/2011 I/ Mơc ®Ých, yªu cÇu: * KiÕn thøc: - ViÕt ®ỵc ch¬ng tr×nh cã sư dơng vßng lỈp for …do; - Sư dơng ®ỵc c©u lƯnh ghÐp * Kü n¨ng: RÌn lun kü n¨ng ®äc hiĨu ch¬ng tr×nh cã sư dơng vßng lỈp for …do * Th¸i ®é: Nghiªm tóc, tÝch cùc, vui vỴ II/ Ph¬ng ph¸p: Thut tr×nh, vÊn ®¸p, theo dâi thùc hµnh GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc III/ Chn bÞ: Chn bÞ cđa GV: Chia nhãm HS, phßng m¸y, … Chn bÞ cđa HS: §äc tríc bµi ë nhµ IV/ Ho¹t ®éng d¹y häc: ỉn ®Þnh tỉ chøc Ngµy d¹y Líp TiÕt HS v¾ng NhËn xÐt H§ D¹y 8A1 8A2 8A3 8A4 8A5 KiĨm tra bµi cò CÊu tróc lỈp víi sè lÇn biÕt tríc ®ỵc thĨ hiƯn b»ng c©u lƯnh Pascal nh thÕ nµo? (For := to ; - Trong ®ã For, to, lµ tõ kho¸, biÕn ®Õm cã kiĨu sè nguyªn, gi¸ trÞ ®Çu vµ gi¸ trÞ ci lµ c¸c gi¸ trÞ nguyªn) D¹y bµi míi Ho¹t ®éng cđa GV Ho¹t ®éng cđa HS Ho¹t ®éng 1: Gâ vµ ch¹y ch¬ng tr×nh sau Program Chao_hoi; var ten: string; i: integer; C¸c nhãm thùc hµnh trªn m¸y Begin Ch¹y ch¬ng tr×nh nhËp tªn For i:= to Begin c¸c b¹n nhãm quan s¸t Write (‘ Nhap ten cua ban:’); Readln(ten); kÕt qu¶ vµ cho nhËn xÐt Writeln(‘ Chao ban’, ten); end; Readln; End GV yªu cÇu HS thay ®ỉi gi¸ trÞ ci vµ yªu cÇu HS nhËn Sè lÇn lỈp b»ng xÐt vỊ sè lÇn nhËp tªn vµ hiĨn thÞ lêi chµo gi¸ trÞ ci - gi¸ trÞ ®Çu +1 Ho¹t ®éng 2: T×m hiĨu bµi tËp SGK Gv yªu cÇu HS ®äc ®Ị bµi HS ®äc ®Ị bµi a) GV yªu cÇu HS gâ ch¬ng tr×nh sau ®©y: Program Bangnhan; uses crt; var n, i : integer; Begin clrscr; Write(‘Nhap so n = ‘); Readln (n); Writeln; C¸c nhãm thùc hµnh trªn m¸y Writeln(‘ Bang nhan ‘, n); Writeln; For i := to 10 Writeln (n,’ x’, i: 2,’ =’, N*i :3); Readln; End b) T×m hiĨu ý nghÜa cđa c¸c c©u lƯnh ch¬ng tr×nh * T×m hiĨu c©u lƯnh For i := to 10 Writeln (n,’ x’, i: 2,’ =’, N*i :3); GV cho HS th¶o ln nhãm ®Ĩ hoµn thµnh mét b¶ng tiÕn tr×nh thùc hiƯn cđa c©u lƯnh trªn (gi¶ sư víi n = 3) Bíc i Writeln(n,’.’,i,’ = ‘,n*i) i ≤ 10? C¸c nhãm th¶o ln vµ ®a 1 §óng 3.1=3 kÕt qu¶ 2 §óng 3 §óng 4 §óng 5 §óng 6 §óng 7 §óng 8 §óng 9 §óng 10 10 §óng 11 11 Sai GV: Ngun V¨n Dòng 2=6 3.3=9 3.4=12 3.5=15 3.6=18 3.7=21 3.8=24 3.9=27 3.10=30 Kh«ng thùc hiƯn lƯnh Thùc hiƯn trªn m¸y vµ quan N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Writeln KÕt thóc Gi¸o ¸n Tin häc s¸t kÕt qu¶ * DÞch ch¬ng tr×nh sưa lçi nÕu cã C¸c nhãm quan s¸t vµ bỉ * Ch¹y ch¬ng tr×nh víi c¸c gi¸ trÞ nhËp vµo lÇn lỵt b»ng sung cho 1,2, 10 Quan s¸t kÕt qu¶ nhËn ®ỵc trªn mµnh×nh Ho¹t ®éng 3: T×m hiĨu bµi tËp ChØnh sưa ch¬ng tr×nh ®Ĩ lµm ®Đp kÕt qu¶ trªn mµn h×nh ?KÕt qu¶ nhËn ®ỵc bµi cã nhỵc ®iĨm g×? §Ĩ chØnh sưa ch¬ng tr×nh nµy ta lµm nh thÕ nµo? - Khã ®äc * Ta sư dơng c¸c lƯnh GotoXY, Where X vµ WhereY - C¸c hµng kh«ng c©n ®èi víi - GotoXY(a,b) cã t¸c dơng ®a trá vỊ cét a, hµng b hµng tiªu ®Ị HS tr¶ lêi - Where X cho biÕt sè thø tù cđa cét vµ WhereY sè thø tù cđa hµng ®ang cã trá L¾ng nghe vµ ghi chÐp a) ChØnh sưa c©u lƯnh lỈp cđa ch¬ng tr×nh nh sau: For i := to 10 Begin GotoXY (5, WhereY); Writeln (n,’ x’, i: 2,’ =’, N*i :3); Writeln; end; C¸c nhãm thùc hiƯn trªn m¸y b) DÞch ch¬ng tr×nh víi c¸c gi¸ trÞ gâ vµo tõ bµn phÝm Quan s¸t kÕt qu¶ nhËn ®ỵc trªn mµn h×nh TiÕt 42 - GV: giíi thiƯu cÊu tróc lƯnh for lång, híng dÉn Bµi SGK (T64) häc sinh c¸ch sư dơng lƯnh a) C©u lƯnh for lång for - HS: ghi chÐp cÊu tróc vµ lÜnh héi - For to mµn h×nh, yªu cÇu häc sinh ®äc ch¬ng tr×nh, t×m For to - HS: ho¹t ®éng theo nhãm, t×m hiĨu ho¹t ®éng cđa < c©u lƯnh>; ch¬ng trinh, ®¹i diƯn cđa nhãm b¸o c¸o kÕt qu¶ Program Tao_bang; th¶o ln Uses crt; - GV: cho ch¹y ch¬ng tr×nh Var i,j: byte; HS : quan s¸t kÕt qu¶ trªn mµn h×nh Begin Clrscr; For i:=1 to Begin For j:=0 to Writeln(10*i+j:4);Writeln; End; Readln; End IV/ Cđng cè: GV yªu cÇu HS nh¾c l¹i c©u lƯnh lỈp For to…do - NhËn xÐt rót kinh nghiƯm giê thùc hµnh - Y/c häc sinh vỊ nhµ sư dơng lƯnh gotoxy ®Ĩ chØnh sưa l¹i bµi thùc hµnh sè cho kÕt qu¶ in mµn h×nh ®Đp Nam §Þnh ngµy…/ /2011 BGH ký dut GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc Ngµy so¹n: 25/01/2011 TiÕt 43 LỈp víi sè lÇn cha biÕt tríc I.Mơc tiªu cÇn ®¹t: * KiÕn thøc: + BiÕt nhu cÇu cÇn cã cÊu tróc lỈp víi sè lÇn cha biÕt tríc ng«n ng÷ lËp tr×nh; + BiÕt ng«n ng÷ lËp tr×nh dïng cÊu tróc lỈp víi sè lÇn cha biÕt tríc ®Ĩ chØ dÉn m¸y tÝnh thùc hiƯn lỈp ®i lỈp l¹i c«ng viƯc ®Õn mét ®iỊu kiƯn nµo ®ã ®ỵc tho¶ m·n; * Kü n¨ng: + HiĨu ho¹t ®éng cđa c©u lƯnh lỈp víi sè lÇn cha biÕt tríc while do… Pascal * Th¸i ®é: + Nghiªm tóc, tÝch cùc, vui vỴ II TiÕn tr×nh bµi gi¶ng ỉn ®Þnh líp Ngµy d¹y Líp TiÕt HS v¾ng NhËn xÐt H§ D¹y - Häc 8A1 8A2 8A3 8A4 8A5 Gv- §Ỉt vÊn ®Ị: Víi bµi to¸n trªn, TP ta sư dơng vßng lỈp for…to…do th× sÏ thùc hiƯn dƠ dµng Nhng nÕu ta thay sè 100 bëi n ( tÝnh tỉng n sè tù nhiªn ®Çu tiªn) th× ta sÏ gỈp nhiỊu khã kh¨n viƯc sư dơng vßng lỈp for…to…do bëi lóc nµy sè lÇn lỈp kh«ng biÕt tríc VËy ta ph¶i lµm nh thÕ nµo ? Giíi thiƯu bµi míi Bµi míi Ho¹t ®éng cđa GV Ho¹t ®éng cđa HS Ghi b¶ng Y/c hs ®äc vÝ dơ 1sgk/67 §äc bµi C¸c ho¹t ®éng lỈp víi sè Ph©n tÝch vÝ dơ Nghe gi¸o viªn híng Híng dÉn HS x©y dùng tht dÉn, sau ®ã tù x©y dùng lÇn cha biÕt tríc a/ VÝ dơ 1(Sgk) to¸n tht to¸n ?LÊy vÝ dơ vỊ c¸c c«ng viƯc cc sèng h»ng ngµy Häc bµi nµo thc lỈp víi sè lÇn cha biÕt tríc? th× th«i b/ VÝ dơ (Sgk) Y/c HS ®äc vÝ dơ Gi¶i : Híng dÉn häc sinh ch¹y §äc vÝ dơ SGK KÝ hiƯu S lµ tỉng cÇn t×m vµ ta tht to¸n trªn Quan s¸t cã tht to¸n nh sau: + Bíc S ← 0, n ← + Bíc NÕu S # 1000, n ← n GV: Ngun V¨n Dòng N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Giíi thiƯu s¬ ®å khèi * NhËn xÐt : §Ĩ viÕt ch¬ng tr×nh chØ dÉn m¸y tÝnh thùc hiƯn c¸c ho¹t ®éng lỈp nh c¸c vÝ dơ trªn, ta cã thĨ sư dơng c©u lƯnh cã d¹ng lỈp víi sè lÇn cha biÕt tríc Gi¸o ¸n Tin häc Ghi bµi Cã thĨ sư dơng lƯnh lỈp víi sè lÇn lỈp cha biÕt tríc c¸c ch¬ng tr×nh lËp tr×nh Giíi thiƯu có ph¸p lƯnh while … ….; III Cđng cè bµi: HS ®äc phÇn ghi nhí SGK + 1; ngỵc l¹i chun tíi bíc + Bíc S ← S + n vµ quay l¹i bíc + Bíc In kÕt qu¶ : S vµ n lµ sè tù nhiªn nhá nhÊt cho S > 1000 KÕt thóc tht to¸n * Ta cã s¬ ®å khèi : VÝ dơ vỊ lƯnh lỈp víi sè lÇn cha biÕt tríc Trong Pascal c©u lƯnh lỈp víi sè lÇn cha biÕt tríc cã d¹ng: while ; ®ã: + ®iỊu kiƯn thêng lµ mét phÐp so s¸nh; + c©u lƯnh cã thĨ lµ c©u lƯnh ®¬n gi¶n hay c©u lƯnh ghÐp C©u lƯnh lỈp nµy ®ỵc thùc hiƯn nh sau: Bíc : KiĨm tra ®iỊu kiƯn Bíc : NÕu ®iỊu kiƯn SAI, c©u lƯnh sÏ bÞ bá qua vµ viƯc thùc hiƯn lƯnh lỈp kÕt thóc NÕu ®iỊu kiƯn ®óng, thùc hiƯn c©u lƯnh vµ quay l¹i bíc TiÕt 44 LỈp víi sè lÇn cha biÕt tríc (tiÕp theo) Ho¹t ®éng cđa GV Ho¹t ®éng cđa HS Néi dung Y/c hs nh¾c l¹i có ph¸p c©u While VÝ dơ Ch¬ng tr×nh Pascal díi lƯnh lỈp víi sè lÇn cha biÕt trDo ®©y thĨ hiƯn tht to¸n tÝnh sè íc n vÝ dơ 2: Ta tiÕp tơc xÐt c¸c vÝ dơ mµ var S,n: integer; ch¬ng tr×nh cã c©u lƯnh Begin víi sè lÇn lỈp cha biÕt tríc S:=0; n:=1; XÐt vÝ dơ While S 1000 VÝ dơ ViÕt ch¬ng tr×nh tÝnh ViÕt ch¬ng tr×nh tÝnh tỉng §äc vÝ dơ sgk 1 tỉng T = + + + + 1 T = 1+ 2 + + + 100 VÝ dơ nµy cho thÊy r»ng chóng ta cã thĨ sư dơng c©u lƯnh while…do thay cho c©u lƯnh for…do Giíi thiƯu phÇn Khi viÕt ch¬ng tr×nh sư dơng GV: Ngun V¨n Dòng 100 Gi¶i : §Ĩ viÕt ch¬ng tr×nh tÝnh tỉng Chó ý nghe T = 1+ 1 ta cã thĨ sư + + + 100 dơng lƯnh lỈp víi sè lÇn lỈp biÕt tríc for…do: T:=0; N¨m häc: 2010 - 2011 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc for i:=1 to 100 T:=T+1/i; cÊu tróc lỈp cÇn chó ý tr¸nh writeln(T); t¹o nªn vßng lỈp kh«ng bao NÕu sư dơng lƯnh lỈp while… giê kÕt thóc do, ®o¹n ch¬ng tr×nh díi ®©y Ch¼ng h¹n, ch¬ng tr×nh díi còng cho cïng mét kÕt qu¶: ®©y sÏ lỈp l¹i v« tËn: T:=0; var a:integer; i:=1; begin while i[...]... t ca mng 2 Kỹ năng - Hiu thut toán tìm s ln nht, nh nht ca mt dãy s 3 Thái độ - HS có thái độ nghiêm túc, tích cực trong học tập II Chuẩn bị 1 Giáo viên: giáo án, máy chiếu 2 Hc sinh: Kin thc c, sách, v III Tiến trình lên lớp 1 ổn định tổ chức : Ngày dạy Lớp Tiết HS vắng Nhận xét HĐ Dạy GV: Nguyễn Văn Dũng 24 Năm học: 20 10 - 20 11 Trờng THCS Lý Tự Trọng Giáo án Tin học 8 8A1 8A2 8A3 8A4 8A5 2 Bài mới... := 0; For j := 5 To 8 Do S:= S + j; 2 Sau khi thực hiện đoạn chơng trình sau, biến S có giá trị bằng bao nhiêu? S := 0; i:= 0; While S< =8 Do Begin i := i + 1;S := S + i; End; GV: Nguyễn Văn Dũng 23 Năm học: 20 10 - 20 11 Trờng THCS Lý Tự Trọng Giáo án Tin học 8 E Đáp án 1 Câu 2 3 4 5 6 7 8 D C C B D C C D Đáp số 1 2 Nam Định ngày tháng năm 20 11 BGH kí duyệt Ngày 10 tháng 3 năm 20 11 Tiết 54 - 55: Bài... dạy học 1.ổn định tổ chức : Ngày dạy Lớp Tiết HS vắng Nhận xét HĐ Dạy - Học 8A1 8A2 8A3 8A4 8A5 2 Bài mới: Nội dung ghi bảng Hoạt động của Gv và HS Hoạt động 1: Giới thiệu phần mềm geogebra GV: Nguyễn Văn Dũng 12 Năm học: 20 10 - 20 11 Trờng THCS Lý Tự Trọng Giáo án Tin học 8 1 Em đã biết gì về GeoGebra? Cho học sinh đọc thông tin SGK - Phần mềm GeoGebra dùng để vẽ các hình ? Em biết gì về phần mềm Geogebra... bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học - Đọc các Bài tập thực hành còn lại Nam Định ngày tháng năm 20 12 BGH kí duyệt GV: Nguyễn Văn Dũng 20 Năm học: 20 10 - 20 11 Trờng THCS Lý Tự Trọng Giáo án Tin học 8 Ngày 28 tháng 2 năm 20 11 Tiết 51 - 52: học vẽ hình với phần mềm geogebra(Tiếp theo) I Mục tiêu * Kiến thức : Học sinh thực hành đợc các ứng dụng cơ bản của phần mềm vẽ... đúng A TIN : Array[10 1] of Integer; B TIN : Array[1 10] of Interger; C TIN : Array[10 1] of Interger; D TIN : Array[1 10] of Integer; 6 Câu lệnh For i:= 4 to 10 Do thực hiện lặp bao nhiêu lần? A 4 B 6; C 7; D 14 7 Câu lệnh i:= 2; While i ... Häc 8A1 8A2 8A3 8A4 8A5 Bµi míi: Néi dung ghi b¶ng Ho¹t ®éng cđa Gv vµ HS Ho¹t ®éng 1: Giíi thiƯu phÇn mỊm geogebra GV: Ngun V¨n Dòng 12 N¨m häc: 20 10 - 20 11 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin. .. xÐt H§ D¹y - Häc 8A1 8A2 8A3 8A4 8A5 2. Bµi míi : Ho¹t ®éng 1:Thùc hµnh Ho¹t ®éng cđa HS Ho¹t ®éng cđa GV GV: Ngun V¨n Dòng 19 N¨m häc: 20 10 - 20 11 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc - Thùc... l¹i Nam §Þnh ngµy th¸ng n¨m 20 12 BGH kÝ dut GV: Ngun V¨n Dòng 20 N¨m häc: 20 10 - 20 11 Trêng THCS Lý Tù Träng Gi¸o ¸n Tin häc Ngµy 28 th¸ng n¨m 20 11 TiÕt 51 - 52: häc vÏ h×nh víi phÇn mỊm geogebra(TiÕp