Công việc không biết trước số lần lặp lại: học bài cho đến khi thuộc hết các bài, - Công việc đã biết trước số lần lặp: đi học mỗi s¸ng 5 tiÕt, mçi ngµy tËp 7 bµi thÓ dôc buæi sáng, đánh[r]
(1)TuÇn 19 TiÕt 37-38: c©u lÖnh lÆp I/Mục đích, yêu cầu: - BiÕt nhu cÇu cÇn cã c©u lÖnh 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 để dẫn máy tính thực lặp lặp lại công việc nào đó số lần - Hiểu hoạt động câu lệnh lặp với số lần biết trước for pascal - Viết đúng lệnh for số tình đơn giản - BiÕt kÕt hîp c©u lÖnh ghÐp vµ c©u lÖnh lÆp for ………do vµo gi¶i quyÕt mét sè bµi to¸n II/ ChuÈn bÞ cña häc sinh vµ gi¸o viªn: GV: Bµi tËp HS: nghiên cứu trước bài III/ TiÕn tr×nh d¹y häc: Bµi cò: ? Trình bày cấu trúc câu lệnh rẽ nhánh pascal, nêu ý nghĩa hoạt động câu lÖnh? ? M« t¶ thuËt tho¸n tÝnh tæng cña 100 sè tù nhiªn ®Çu tiªn? Bµi míi: Hoạt động GV + HS Néi dung ghi b¶ng Hoạt động 1: C ác công việc phải thực hiền nhiều lần ?Hàng ngày chúng ta thường phải làm mét sè viÖc lÆp ®i lÆp l¹i mét sè lÇn, em h·y lÊy vÝ dô vÒ mét sè viÖc hµng ngµy em ph¶i lµm Ghi vÝ dô cña häc sinh lªn b¶ng ? Qua nh÷ng vÝ dô c¸c b¹n võa lÊy trªn b¶ng th× nh÷ng c«ng viÖc nµo chúng ta đã biết trước số lần lặp lặp l¹i vµ c«ng viÖc nµo chóng ta cha biÕt sè lÇn lÆp l¹i cña nã? - GV: NhËn xÐt vµ chèt l¹i Công việc không biết trước số lần lặp lại: học bài thuộc hết các bài, - Công việc đã biết trước số lần lặp: học s¸ng tiÕt, mçi ngµy tËp bµi thÓ dôc buæi sáng, đánh ngày lần, => Để cho máy tính thực đúng công việc, nhiều trường hợp viết chương trình máy tính chúng ta phải viết lÆp l¹i nhiÒu c©u lÖnh thùc hiÖn mét phÐp tÝnh định VD1: §Ó tÝnh sè tù nhiªn ®Çu tiªn ta cã thÓ viÕt nh sau: begin I=0; Tong:=0; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; Readln; end Lop8.net (2) Hoạt động 2: Câu lệnh lặp- Một lệnh thay cho nhiều lệnh Hs nghiªn cøu vÝ dô SGK - 56,57 - GV: ph©n tÝch vÝ dô VD1: VÏ h×nh vu«ng gièng - thuËt to¸n (SGK T56,57) VD2: TÝnh tæng cña 100 sè tù nhiªn ®Çu tiªn ? Qua hai ví dụ trên, các em hãy - thuật toán: (đã nghiên cứu bài học số 5) => Kết luận: - Các mô tả các hoạt động lặp nh÷ng c«ng viÖc ®îc lÆp ®i lÆp l¹i? thuËt to¸n nh vÝ dô trªn ®îc gäi lµ cÊu tróc lÆp - GV: KÕt luËn - Mọi ngôn ngữ lập trình có “cách” để thÞ cho m¸y tÝnh thùc hiÖn cÊu tróc lÆp víi mét c©u lÖnh §ã lµ c©u lÖnh lÆp Hoạt động 3: Ví dụ câu lệnh lặp GV: Tr×nh bµy cÊu tróc vßng lÆp For to - GV: Gi¶i thÝch tõng thµnh phÇn cÊu tróc lÖnh - GV: vËn dông c©u lÖnh viÕt vßng lÆp cho vÝ dô phÇn Trong pascal c©u lÖnh lÆp cã d¹ng: +C©u lÖnh lÆp d¹ng tiÕn: For <biến đếm>:= <giá trị đầu> to <gi¸ trÞ cuèi> <c©u lÖnh>; Trong đó: for, to, là các từ khoá Biến đếm là biến đơn có kiểu nguyên (có thể là kiểu kí tự hoÆc kiÓu ®o¹n con) Var i, tong: integer; Gi¸ trÞ ®Çu, gi¸ trÞ cuèi lµ biÓu thøc cã kiÓu Begin cùng kiểu với biến đếm, giá trị cuối phải lớn Tong:=0; h¬n gi¸ trÞ ®Çu For i: = to Câu lệnh có thể là câu lệnh đơn câu lệnh Tong:= tong + i; kÐp Write(‘tong=’,tong); - C©u lÖnh sÏ ®îc thùc hiÖn nhiÒu lÇn, Readln; mçi lÇn thùc hiÖn c©u lÖnh lµ mét lÇn lÆp End và sau lần lặp biến đếm tự động tăng lên đơn vị, tăng giá trị GV: Tr×nh bµy cÊu tróc cña c©u lÖnh biến đếm lớn giá trị cuối thì lÆp lïi pascal vßng lÆp ®îc dõng l¹i For downto - GV: Giải thích hoạt động câu lện Cấu trúc câu lệnh lặp lùi: For <biến đếm>:= <giá trị cuối> downto - GV: cho chạy chương trình mẫu đã <giá trị đầu> <câu lệnh>; gõ trước máy, yêu cầu học sinh - Câu lệnh thực nhiều lần, lần quan s¸t kÕt qu¶ thùc hiÖn c©u lÖnh lµ mét lÇn lÆp vµ sau mçi lÇn lặp biến đếm tự động giảm đi1 đơn vị, giảm giá trị biến đếm nhỏ giá trị - GV: Giải thích kết chương đầu thì vòng lặp dừng lại tr×nh -sè lÇn lÆp = gi¸ trÞ cuèi-gi¸ trÞ ®Çu+1 => for …do lµ cÊu tróc lÆp víi sè lÇn lÆp biÕt trước VÝ dô in mµn h×nh thø tù lÇn lÆp Lop8.net (3) - GV: Tr×nh bµy cÊu tróc c©u lÖnh Program lap; ghÐp Var i: integer; Begin For i:=1 to 10 Writeln(‘day la lan lap thu’, i); - GV: cho chạy chương trình mẫu đã Readln; gõ trước máy, yêu cầu học sinh End quan s¸t kÕt qu¶ VD4 Viết chương trình đưa màn hình nh÷ng ch÷ “0” theo h×nh trøng r¬i Program trung_roi; Uses crt; Var i: integer; Begin Clrscr; For i:=1 to 10 - GV: Giải thích kết chương begin tr×nh Writeln(‘0’); delay(100); end; Readln; End - Tập hợp các câu lệnh đặt cặp tõ kho¸ begin end; ®îc gäi lµ c©u lÖnh ghÐp Hoạt động 4: Tính tổng và tích câu lệnh lặp GV: Đưa đề bài lên bảng Hs hoạt động nhóm lớp các em làm bài theo nhóm, mçi d·y lµm mét bµi, d·y gi÷a lµm vd5 -GV: Giúp HS sửa lại đúng thuật toán - GV: Giúp học sinh sửa chương trình cho đúng và chạy chương trình trên m¸y VÝ dô TÝnh tæng cña N sè tù nhiªn ®Çu tiªn Program tinhtong; Var N,i : integer; S : longint; Begin Write(‘nhap so N= ‘); Readln(N); S:=0; For i:=1 to N S:= S + 1; Writeln(‘tong cua ‘,N ,’ so tu nhien dau tien S= ‘, S); Readln End VÝ dơ TÝnh giai thừa cđa N sè tù nhiªn ®Çu tiªn (Chương trình SGK) Cñng cè: HS đọc ghi nhớ SGK Giáo viên tổng kết đánh giá buổi học Lop8.net (4) Hướng dẫn học nhà: 1p VÒ nhµ lµm bµi tËp trang 60-61 Chuaån bò baøi cho tieát sau OÂn laïi caùc caâu leänh laëp vaø caâu ñieàu kieän Tæ chuyªn m«n ký duyÖt ngµy / / 2009 TTCM NguyÔn ThÞ An Lop8.net (5) Gi¸o ¸n: Tin häc Người soạn: Đoàn Thị ánh Nguyệt Trường THCS Sơn Hoá Lop8.net (6)