Giáo án Tin học 8 - Tiết 37-38: Câu lệnh lặp - Đoàn Thị Ánh Nguyệt

<span class='text_page_counter'>(1)</span>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 trong 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 ...do trong pascal. - Viết đúng được lệnh for ..do trong một số tình huống đơ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: 1. Bµi cò: ? Trình bày cấu trúc của câu lệnh rẽ nhánh trong pascal, nêu ý nghĩa hoạt động của câu lÖnh? ? M« t¶ thuËt tho¸n tÝnh tæng cña 100 sè tù nhiªn ®Çu tiªn? 2. Bµi míi: Hoạt động của 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 ra 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 đi lặp l¹i vµ c«ng viÖc nµo chóng ta ch­a 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 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ăng mỗi ngày 3 lần, => Để chỉ cho máy tính thực hiện đúng công việc, trong nhiều trường hợp khi viết một chương trình máy tính chúng ta cũng 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ất định. VD1: §Ó tÝnh 5 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. 1 Lop8.net.

<span class='text_page_counter'>(2)</span> 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ô 1 SGK - 56,57. - GV: ph©n tÝch vÝ dô 1.. VD1: VÏ 3 h×nh vu«ng gièng nhau. - 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 chỉ ra - 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? trong thuËt to¸n nh­ trong 2 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 đều có “cách” để 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ụ về câu lệnh lặp GV: Tr×nh bµy cÊu tróc vßng lÆp For ..to..do.. - GV: Gi¶i thÝch tõng thµnh phÇn trong cÊu tróc lÖnh. - GV: vËn dông c©u lÖnh viÕt vßng lÆp cho vÝ dô 1 phÇn 1. 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> do <c©u lÖnh>; Trong đó: for, to, do 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: = 1 to 5 do Câu lệnh có thể là câu lệnh đơn hoặc 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 mỗi lần lặp biến đếm sẽ tự động tăng lên 1 đơn vị, tăng cho đến khi giá trị GV: Tr×nh bµy cÊu tróc cña c©u lÖnh của biến đếm lớn hơn giá trị cuối thì lÆp lïi trong pascal vßng lÆp ®­îc dõng l¹i. For ...downto ... do - GV: Giải thích hoạt động của câu lện. Cấu trúc của 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> do <câu lệnh>; gõ trước trong máy, yêu cầu học sinh - Câu lệnh sẽ được thực hiện nhiều lần, mỗi 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 sẽ tự động giảm đi1 đơn vị, giảm cho đến khi giá trị của biến đếm nhỏ hơn giá trị - GV: Giải thích kết quả của chương đầu thì vòng lặp được 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ô 3. in ra mµn h×nh thø tù lÇn lÆp. 2 Lop8.net.

<span class='text_page_counter'>(3)</span> - 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 do Writeln(‘day la lan lap thu’, i); - GV: cho chạy chương trình mẫu đã Readln; gõ trước trong máy, yêu cầu học sinh End. quan s¸t kÕt qu¶. VD4. Viết chương trình đưa ra 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 do - GV: Giải thích kết quả của chương begin tr×nh Writeln(‘0’); delay(100); end; Readln; End. - Tập hợp các câu lệnh con được đặt trong 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 bằng câu lệnh lặp GV: Đưa đề bài lên bảng Hs hoạt động nhóm ở dưới 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ô 5. 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 do S:= S + 1; Writeln(‘tong cua ‘,N ,’ so tu nhien dau tien S= ‘, S); Readln End. VÝ dơ 6. TÝnh giai thừa cđa N sè tù nhiªn ®Çu tiªn (Chương trình SGK). 5. Cñng cè: HS đọc ghi nhớ SGK Giáo viên tổng kết đánh giá buổi học. 3 Lop8.net.

<span class='text_page_counter'>(4)</span> 6.. 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. 4 Lop8.net.

<span class='text_page_counter'>(5)</span> Gi¸o ¸n: Tin häc 8. Người soạn: Đoàn Thị ánh Nguyệt. Trường THCS Sơn Hoá Lop8.net.

<span class='text_page_counter'>(6)</span>