Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (84.58 KB, 2 trang )
<span class='text_page_counter'>(1)</span>TiÕt 39. Ngµy so¹n : 04/01/2009 Ngµy d¹y : 05/01/2009 Bµi thùc hµnh 5 Sö dông lÖnh lÆp for … do. I. Môc tiªu: 1. KiÕn thøc: Viết được chương trình có câu lệnh lặp for … do - Sö dông ®îc c©u lÖnh ghÐp. 2. Kü n¨ng: - Rèn luyện kỹ năng đọc hiểu chương trình có sử dụng câu lệnh lặp For … do 3. Thái độ: - Có thái độ học tập nghiêm túc, tập trung cao độ. II. ChuÈn bÞ 1. Gi¸o viªn: - Gi¸o ¸n, phßng m¸y. 2. Häc sinh: - Chuẩn bị nghiên cứu trước bài học. III. Phương pháp - LuyÖn tËp, thùc hµnh. IV. TiÕn tr×nh d¹y – häc A. ổn định B. KiÓm tra bµi cò. C. Néi dung thùc hµnh. H§ cña GV GV ph©n c«ng 3 HS/ 1 m¸y thùc hiÖn.. H§ cña HS. - GV yªu cÇu HS gâ bµi 1 - HS thùc hiÖn (Trang 62 SGK). theo hướng dẫn cña gi¸o viªn - GV quan s¸t HS thùc hµnh. - HS t×m hiÓu ý - GV yªu cÇu HS t×m hiÓu ý nghÜa cña c¸c c©u nghÜa cña c¸c lện trong chương trình, c©u lÖn trong dịch chương trình và sửa chương trình, dịch chương lçi nÕu cã. tr×nh vµ söa lçi nÕu cã.. Lop7.net. Néi dung Bài 1. Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, sè ®îc nhËp tõ bµn phÝm vµ dõng màn hình để có thể quan sát kết quả. a) gõ chương trình sau: Uses crt; Var N,i: integer; Begin Clrscr; Write(‘ Nhap so N= ‘); Readln(N); Writeln; Writeln(‘ B¶ng nh©n ‘,N); Writeln; For i:=1 to 10 do.
<span class='text_page_counter'>(2)</span> - GV Hướng dẫn HS chạy chương trình với các giá trị nhập vào lần lượt bằng 1,2,3, …, 10. Quan s¸t kÕt qu¶ nhËn ®îc trªn mµn h×nh. - GV quan s¸t HS thùc hành đồng thời sửa giúp HS nh÷ng lçi trong chương trình hoặc những chç HS Cha hiÓu. - GV yªu cÇu HS chØnh sửa chương trình để làm đẹp kết quả trên màn h×nh. (Gâ theo n«Þi dung ( a) – Bµi 2 - Trang 63 SGK). GV?GotoXY(5,WhereY); - GV gi¶i thÝch bæ sung: + GotoXY + WhereX: ….. + WhereY: ….. GotoXY(5,WhereY); - GV Hướng dẫn HS chạy 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.. - HS ch¹y chương trình với c¸c gi¸ trÞ nhËp vào lần lượt b»ng 1,2,3, …, 10. Quan s¸t kÕt qu¶ nhËn ®îc trªn mµn h×nh theo sự hướng dÉn cña GV.. HS chØnh söa chương trình theo hướng dẫn cña GV - HS tr¶ lêi. - HS DÞch vµ chạy 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.. D. cñng cè - Nh¾c l¹i cÊu tróc lÆp, c©u lÖnh lÆp. E. Hướng dẫn về nhà - §äc vµ nghiªn cøu Bµi 3 trang 64 SGK. - §äc kü phÇn tæng kÕt trang 65 SGK. - Đọc bài đọc thên trang 65 SGK.. Lop7.net. Writeln(N,’x’,i:2,’ = ‘,N*i:3); Readln; End. b) T×m hiÓu ý nghÜa cña c¸c c©u lÖn trong chương trình, dịch chương trình vµ söa lçi nÕu cã. c) Chạy chương trình với các giá trị nhập vào lần lượt bằng 1,2,3, …, 10. Quan s¸t kÕt qu¶ nhËn ®îc trªn mµn h×nh. Bài 2. Chỉnh sửa chương trình để làm đẹp kết quả trên màn hình. For i:=1 to 10 do Begin GotoXY(5,WhereY); Writeln(N,’ x ’, i:2 ,’ = ‘, N*i:3); Writeln; End;. b) Dịch và chạy 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..
<span class='text_page_counter'>(3)</span>