Giáo án Tin học 8 - Tuần 22 - Năm học 2008-2009

<span class='text_page_counter'>(1)</span>TuÇn 22 Ngµy so¹n: Ngµy d¹y:. /02/09. TiÕt 43: C©u lÖnh lÆp A. Môc tiªu: - Biết được cấu trúc lặp được sử dụng để hướng dẫn cho máy tính thực hiện lặp lại một công việc nào đó một số lần. - BiÕt nhu cÇu cÇn cã cÊu tróc lÆp trong NNLT - Có kĩ năng đọc và tìm hiểu chương trình trong các ví dụ.. B. ChuÈn bÞ: - ThÇy: H×nh ¶nh - HS: Thùc hiÖn theo HD ë tiÕt 42. C. TiÕn tr×nh: 1. ổn định: KTSS, tư cách HS 2. KiÓm tra bµi cò: HS1: ViÕt c©u lÖnh theo yªu cÇu: NhËp ®iÓm kiÓm tra, nÕu ®iÓm nhá h¬n 5 th× hiÓn thÞ dßng ch÷: “Ban can co gang”. HS2: Cho biết kết quả việc thực hiện chương tình sau: Uses crt; Begin Clrscr; Writeln(‘O”); delay(300); Writeln(‘O”); delay(300); Writeln(‘O”); delay(300); 20 lÇn ......................................... Writeln(‘O”); delay(300); End. HS kh¸c NX, GV NX chung vµ cho ®iÓm GV đặt vấn đề: Với chương trình trên, nếu viết đi viết lại 20 lần lệnh Writeln(‘O”); delay(300); thì rất phức tạp và mất thời gian. Vậy có cách nào khác ngắn hơn, đơn giản hơn, khoa học hơn để viết chương trình trên được không?. 3. Bµi míi: Hoạt động của thầy và trò GV: §­a ra c¸c vÝ dô vÒ c«ng viÖc ph¶i thùc hiÖn lÆp l¹i hµng ngµy nh­ SGK ? Trong c¸c vÝ dô trªn, c«ng viÖc nµo ®­îc lặp lại với số lần biết trước, công việc nào được lặp lại với số lần không xác định?. Lop8.net. Néi dung. 1. C¸c c«ng viÖc ph¶i thùc hiÖn nhiÒu lÇn: VD: -. §¸nh r¨ng mçi ngµy hai lÇn Mïa hÌ, mçi ngµy t¾m mét lÇn.

<span class='text_page_counter'>(2)</span> HS: + §¸nh r¨ng mçi ngµy hai lÇn; Mïa hÌ, mçi ngµy t¾m mét lÇn lµ c¸c c«ng viÖc được lặp lại với số lần biết trước + Học cho đến khi thuộc bài; Nhặt từng cọng rau cho đến khi xong.là công việc được lặp lại với số lần không xác định GV chèt l¹i GV: Trong khi viết chương trình, để chỉ dẫn cho MT thực hiện đúng công việc phải lặp lại nhiều lần, người lập trình phải làm gì để giảm nhẹ công việc viết chương tr×nh? GV giíi thiÖu c©u lÖnh lÆp ? §äc vÝ dô 1 (SGK – 56) GV ®­a ra h×nh vÏ 3 h×nh vu«ng HS quan s¸t vµ nhËn xÐt vÒ 3 h×nh vu«ng trªn HS: ...3 h×nh vu«ng b»ng nhau vµ mèi h×nh là ảnh dịch chuyển sang trái 2 đơn vị của h×nh kia. ? Thao t¸c g× ®­îc lÆp l¹i trong vÝ dô 1? HS: Thao t¸c vÏ h×nh vu«ng lÆp l¹i 3 lÇn HS đọc và tham khảo thuật toán của phép vÏ 3 h×nh vu«ng trªn vµ ph©n tÝch thuËt to¸n. ? Nªu c¸ch vÏ mét h×nh vu«ng? HS: ... bèn lÇn thao t¸c vÏ mét ®o¹n th¼ng b»ng nhau. HS hoạt động theo nhóm thảo luận để nêu thuật toán mô tả các bước vẽ hình vuông §¹i diÖn nhãm tr¶ lêi GV l­u ý: BiÕn k ®­îc sö dông nh­ biÕn đếm để ghi lại số cạnh đã vẽ được. GV ®­a ra tiÕp VD 2 (SGK – 57) ? Làm thế nào để tính được S? HS: .. cã thÓ cã nhiÒu c¸ch GV nªu thuËt to¸n tÝnh tæng cña mét tr¨m sè tù nhiªn ®Çu tiªn ? Các hoạt động của việc tính tổng này cso gì đặc biệt? HS: Các hoạt động này giống nhau là cùng thùc hiÖn phÐp céng: kÕt qu¶ c¶u ho¹t động trước là dữ liệu vào của hoạt động. Lop8.net. -. Học cho đến khi thuộc bài Nhặt từng cọng rau cho đến khi xong.. 2. C©u lÖnh lÆp – mét lÖnh thay cho nhiÒu lÖnh: VÝ dô 1 (SGK – 56) - ThuËt to¸n vÏ 3 h×nh vu«ng b»ng nhau SGK – 56. - Thuật toán mô tả các bước để vẽ hình vu«ng:. B1: k ← 0 (k là số đoạn thẳng đã vẽ được) B2: k ← k +1. Vẽ đoạn thẳng 1 đơn vị độ dài và quay thước 900 sang phải. B3: Nếu k < 4 thì trở lại B2. Ngược lại, kết thóc thuËt to¸n. VÝ dô 2 : SGK – 57. * Mọi NNLT đều có cách để chỉ thị cho MT thùc hiÖn cÊu tróc lÆp víi mét c©u.

<span class='text_page_counter'>(3)</span> tiÕp theo. GV NX vµ NhÊn m¹nh: C¸ch m« t¶ c¸c hoạt động lặp trong thuật toán nhơ trong 2 VD trªn ®­îc gäi lµ cÊu tróc lÆp.. lÖnh. §ã lµ c©u lÖnh lÆp.. 4. Cñng cè: GV nhấn mạnh các nội dung cơ bản đã truyền đạt trong tiết học HS tr¶ lêi c©u hái 1 (SGK – 60) ? Cấu trúc lặp được sử dụng để làm gì? HS kh¸c NX vµ bæ sung, GV chèt l¹i.. 5. Hướng dẫn về nhà: - Xem l¹i bµi, hoµn thiÖn c©u 1 (SGK – 60) - Nghiên cứu trước phần 3, 4 cảu bài; giờ sau học tiếp.. TuÇn 22 Ngµy so¹n: Ngµy d¹y:. /02/09. TiÕt 44: C©u lÖnh lÆp (tiÕp) A. Môc tiªu: - Hiểu hoạt động của câu lệnh với số lần biết trước for – do trong NN Pascal - HiÓu ®­îc lÖnh ghÐp trong Pascal - Có kĩ năng đọc và tìm hiểu chương trình trong các ví dụ. - Viết được câu lệnh lặp for – do đơn giản.. B. ChuÈn bÞ: - ThÇy: B¶ng phô - HS: Thùc hiÖn theo HD ë tiÕt 43. C. TiÕn tr×nh: 1. ổn định: KTSS, tư cách HS 2. KiÓm tra bµi cò: HS1: Trả lời câu hỏi 1 (SGK – 60). Cấu trúc lặp được dùng để làm gì? HS2: Viết lại cú pháp của câu lệnh dạng thiếu và dạng đầy đủ? HS kh¸c NX, GVNX chung vµ cho ®iÓm.. 3. Bµi míi: Hoạt động của thầy và trò Néi dung GV nhÊn m¹nh vai trß cña viÖc sö dông c©u 1. 2. tróc lÆp trong qu¸ tr×nh lËp tr×nh GV giíi thiÖu c©u lÖnh lÆp trong Pascal 3. VÝ dô vÒ c©u lÖnh lÆp: Câu lệnh lặp đơn giản nhất trong Pascal có d¹ng: GV gi¶ thÝch ý nghÜa cña c¸c thµnh phÇn For <biến đếm>:= < giá trị đầu> to <giá tị. Lop8.net.

<span class='text_page_counter'>(4)</span> trong c©u lÖnh - for, to, do: lµ c¸c tõ khãa - biến đếm: là biến đơn có kiểu nguyªn - Gi¸ trÞ ®Çu vµ gi¸ trÞ cuèi: lµ c¸c gi¸ trÞ nguyªn. Vµ gi¸ trÞ cuèi ph¶i lín h¬n gi¸ trÞ ®Çu GV: Khi gÆp c©u lÖnh lÆp trªn, c©u lÖnh được thực hiện bắt đầu với giá trị biến đếm bằng giá trị đầu. Sau đó giá trị biến đếm tăng dần một đơn vị từ giá trị đầu đến giá trÞ cuèi vµ c©u lÖnh ®­îc thùc hiÖn mçi lÇn tăng biến đếm cho đến khi biến đếm vượt qu¸ gi¸ trÞ cuèi th× kÕt thóc. GV ®­a ra vÝ dô 3 (SGK – 58) ? Gi¶i thÝch ý nghÜa c¸c c©u lÖnh trong CT? HS tr¶ lêi, GV nhÊn m¹nh GV tiÕp tôc ®­a ra CT m« pháng qu¶ trøng r¬i Uses crt; Begin Clrscr; Writeln(‘O”); delay(100); Writeln(‘O”); delay(100); Writeln(‘O”); delay(100); 20 lÇn ......................................... Writeln(‘O”); delay(100); End. HS quan s¸t ? Trong chương trình trên, câu lệnh writeln('O'); delay(100) ®­îc viÕt lÆp l¹i bao nhiªu lÇn? HS: ... 20 lÇn ? Em thÊy thÕ nµo nÕu cÇn viÕt lÆp l¹i lÖnh đó tới vài trăm lần hoặc vài nghìn lần? HS: ... qu¸ vÊt v¶, cã thÓ kh«ng thùc hiÖn ®­îc GV ®­a ra VD 4 – SGk – 58 HS quan s¸t vµ so s¸nh 2 CT ? Nªu ý nghÜa cña c©u lÖnh trong CT ë VD 4? GV giíi thiÖu c©u lÖnh. Lop8.net. cuèi> do <c©u lÖnh>; Trong đó: - for, to, do: lµ c¸c tõ khãa - biến đếm: là biến đơn có kiểu nguyªn - Gi¸ trÞ ®Çu vµ gi¸ trÞ cuèi: lµ c¸c gi¸ trÞ nguyªn. Vµ gi¸ trÞ cuèi ph¶i lín h¬n gi¸ trÞ ®Çu. VÝ dô 3: SGK – 58 Chương trình sau sẽ in ra màn hình thứ tự lÇn lÆp: program Lap; var i: Integer; begin for i := 1 to 10 do writeln('Day la lan lap thu ',i); Readln end.. VÝ dô 4: SGK – 58. Uses crt; Var i: integer; begin Clrscr; for i:=1 to 20 do begin writeln('O'); delay(100) end; Readln end.. Lưu ý: Trong ví dụ 4, các câu lệnh đơn giản writeln('O') và delay(100) được đặt trong hai từ khoá begin và end để tạo thành mét c©u lÖnh ghÐp trong Pascal. Tõ ®©y vÒ.

<span class='text_page_counter'>(5)</span> begin writeln('O'); delay(100) end;. Các câu lệnh đơn giản được nằm trong hai tõ khãa Begin vµ end ®­îc gäi lµ c©u lÖnh ghÐp trong Pascal. VËy c©u lÖnh cã thÓ cã mÊy lo¹i? HS: 2 loại (câu lệnh đơn và câu lệnh ghép) ? Qua VD3 vµ $ em thÊy c©u lÖnh lÆp cã t¸c dông g×? HS: .. lµm gi¶m nhÑ c«ng søc viÕt CT. GV ®­a ra VD5 HS quan s¸t vµ NX vÒ c¸ch khai b¸o biÕn HS: .... cã thªm biÕn míi longint GV: longint còng lµ kiÓu sè nguyªn nh­ng có thể lưu các số nguyên trong phạm vi từ 231 đến 231 – 1. Thường sử dụng biến này trong TH sè cã gÝ trÞ lín. ? H·y nªu ý nghÜa c©u lªnh lÆp trong CT? HS thùc hiÖn GV: Giải thích lệnh gán giá trị 0 cho S để đảm bảo tính chính xác của kết quả, đề phòng trong các CT dài, rất có thể trước đó nó đã được gán một giá trị nào đó khác 0. GV giíi thiÖu c«ng thøc tÝnh N! N! = 1.2.3.....N ? TÝnh 5!; 6!? Hai HS tÝnh GV: ViÖc tÝnh N! víi N tõ 10 trë lªn kh«ng đơn giản, tuy nhiên MT có thể làm được viÖc nµy kh«ng khã kh¨n HS tháa luËn nhãm nghiªn cøu t×m hiÓu CT trong VD 6 _ SGK – 59 theo yªu cÇu: ? NhËn xÐt khai b¸o biÕn ? ý nghÜa c©u lÖnh §¹i diÖn c¸c nhãm tr¶ lêi GV l­u ý viÖc g¸n gi¸ trÞ cho p vµ t¸c dông cña c©u lÖnh lÆp. sau, khi nói câu lệnh, ta có thể hiểu đó là câu lệnh đơn hoặc câu lệnh ghép.. 4. TÝnh tæng vµ tÝch b»ng c©u lÖnh lÆp: VÝ dô 5: SGK – 59 Chương trình sau đây sẽ tính tổng của N số tù nhiªn ®Çu tiªn, víi N lµ sè tù nhiªn ®­îc nhËp vµo tõ bµn phÝm (xem vÝ dô 2). program Tinh_tong; var N,i: Integer; S: longint; begin write('Nhap so N = '); readln(N); S:=0; for i := 1 to N do S:=S+i; writeln('Tong cua ',N,' so tu nhien dau tien S = ',S); end.. * L­u ý: SGK - 59 VÝ dô 6: SGK – 59 Ta kÝ hiÖu N! lµ tÝch N sè tù nhiªn ®Çu tiªn. N! = 1.2.3. ... N Dưới đây là chương trình tính N! với N là sè tù nhiªn ®­îc nhËp vµo tõ bµn phÝm. Chương trình sử dụng một câu lệnh lặp for…do: program Tinh_Giai_thua; var N,i: Integer; P: longint; begin write('N = '); readln(N); P:=1; for i:=1 to N do P:=P*i; writeln(N,'! = ',P); end.. * L­u ý: SGK – 60 * Ghi nhí: SGK – 60. 4. Cñng cè: ? Nêu các kiến thức cơ bản đã nắm được trong tiết học?. Lop8.net.

<span class='text_page_counter'>(6)</span> HS lần lượt trả lời. GV nhấn mạnh toàn bộ GV tổ chức cho HS hoạt động theo nhóm làm BT 5 (SGK – 61) GV chốt lại đáp án: Trừ d), tất cả các câu lệnh đều không hợp lệ: a) Giá trị đầu phải nhá h¬n gi¸ trÞ cuèi; b) C¸c gi¸ trÞ ®Çu vµ gi¸ trÞ cuèi ph¶i lµ sè nguyªn; c) ThiÕu dÊu hai chÊm khi g¸n gi¸ trÞ ®Çu; d) Thõa dÊu chÊm ph¶y thø nhÊt, nÕu nh­ ta muèn lÆp lại câu lệnh writeln(’A’)mười lần, ngược lại câu lệnh là hợp lệ; e) Biến x đã được khai báo như là biến có dữ liệu kiểu số thực và vì thế không thể dùng để xác định giá trÞ ®Çu vµ gi¸ trÞ cuèi trong c©u lÖnh lÆp.. 5. Hướng dẫn về nhà: - Xem l¹i toµn bé bµi, lµm tÊt c¶ c¸c BT cuèi bµi trong SGK – 60, 61 - Ghi nhớ câu lệnh lặp, Nghiên cứu trước bài TH 5, giờ sau lên phòng máy TH.. TuÇn 23 Ngµy so¹n: 10/02/09 Ngµy d¹y:. TiÕt 45: Bµi thùc hµnh 5 Sö dông lÖnh lÆp for....do A. Môc tiªu: - Viết chương trình Pascal có câu lệnh lặp for....do - Tiếp tục nâng cao kĩ năng đọc hiểu chương trình.. Lop8.net.

<span class='text_page_counter'>(7)</span> - RÌn ý thøc lµm viÖc theo nhãm nghiªm tóc, hiÖu qu¶.. B. ChuÈn bÞ: - ThÇy: Phßng m¸y + néi dung TH - HS: Thùc hiÖn theo HD ë tiÕt 44. C. TiÕn tr×nh: 1. ổn định: KTSS, tư cách HS 2. KIÓm tra bµi cò: KÕt hîp víi thêi gian TH. 3. Bµi míi: GV tæ chøc cho HS th­c hµnh theo nhãm víi néi dung sau. Néi dung thùc hµnh: 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(‘Bang nhan ‘, N); Writeln; For i:= 1 to 10 do 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 trong chươgn 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, ...., 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 ? Kết quả của CT nhận được trong bài 1 có nhược điểm gì? HS quan s¸t vµ tr¶ lêi GV chốt lại 2 nhược điểm sau: - Các hàng kết quả quá sát nhau nên khó đọc - Các hàng kết quả không được cân đối với hàng tiêu đề. GV ®­a ra c¸ch söa, HS thùc hiÖn a, ChØnh söa c©u lÖnh lÆp cña CT nh­ sau: for i:= 1 to 10 do Begin GotoXY(5, WhereY); writeln(N, ‘ x ‘, i:2, ‘ = ‘, N*i:3); Writeln End; * L­u ý: SGK - 63. Lop8.net.

<span class='text_page_counter'>(8)</span> 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. GV ®i kiÓm tra c¸c nhãm TH vµ c¨n cø kÕt qu¶ TH cña c¸c nhãm GV lÊy ®iÓm 15’. 4. Cñng cè: GV NX ý thøc TH cña c¸c nhãm, rót kinh nghiÖm cho c¸c nhãm lµm viÖc ch­a hiÖu qu¶, ch­a tù gi¸c.... 5. Hướng dẫn về nhà: - Xem lại nội dung các phần đã thực hành - Nghiên cứu trước các phần còn lại trong SGK – 63, 64; giờ sau lên phòng máy TH tiếp. ***************************************. TuÇn 23 Ngµy so¹n: 12/02/09 Ngµy d¹y:. TiÕt 46: Bµi thùc hµnh 5 Sö dông lÖnh lÆp for....do (tiÕp) A. Môc tiªu: HS tiÕp tôc ®­îc cñng cè: - Viết chương trình Pascal có câu lệnh lặp for....do - Tiếp tục nâng cao kĩ năng đọc hiểu chương trình. - RÌn ý thøc lµm viÖc theo nhãm nghiªm tóc, hiÖu qu¶.. B. ChuÈn bÞ: - ThÇy: Phßng m¸y + néi dung TH - HS: Thùc hiÖn theo HD ë tiÕt 45. C. TiÕn tr×nh: 1. ổn định: KTSS, tư cách HS 2. KIÓm tra bµi cò: KÕt hîp víi thêi gian TH. 3. Bµi míi: GV tæ chøc cho HS th­c hµnh theo nhãm víi néi dung sau. Néi dung thùc hµnh: Bµi 3: SGK – 64 a, Tìm hiểu chương trình sau Program Tao_bang; Uses crt; Var i: byte; { chi so cua hang}. Lop8.net.

<span class='text_page_counter'>(9)</span> j: byte; { chi so cua cot} Begin Clrscr; { Xoa man hinh} For i:= 0 to 9 do { Viet theo tung hang} Begin For j:=0 to 9 do { viet theo tung cot tren moi hang} Write(10*i+j :4); {viet cac so ij ra man hinh} Writeln; { xuong hang moi} End; {xong hang thu i} Readln {dung chuong trinh de xem ket qua} End. b, Gõ và chạy chương trình, quan sát kết quả trên màn hình. Sử dụng thêm các câu lệnh GotoXY(a, b) để điều chỉnh (một cách tương đối) bảng kết quả ra giữa màn hình GV đi kiểm tra các nhóm thực hành, uốn nắn và hướng dẫn GV cho HS tham khảo bài đọc thêm 1: Tính gần đúng số Pi (SGK – 65). 4. Cñng cè: ? Qua 2 tiÕt thùc hµnh bµi thùc hµnh 5, em n¾m thªm ®­îc nh÷ng kiÕn thøc g×? HS tr¶ lêi, GV chèt l¹i theo phÇn Tæng kÕt cuèi bµi thùc hµnh (SGK – 65) Một số HS đọc lại phần Tổng kết. 5. Hướng dẫn về nhà: - Xem lại các nội dung đã được TH trong 2 tiết 45 và 46 - Ghi nhí phÇn Tæng kÕt (SGK – 65) - ¤n tËp l¹i bµi “ C©u lÖnh lÆp”, mét sè Bµi tËp trong SGK vÒ c©u lÖnh lÆp.. Lop8.net.

<span class='text_page_counter'>(10)</span> TuÇn 24 Ngµy so¹n: 18/02/09 Ngµy d¹y:. TiÕt 47: Bµi tËp A. Môc tiªu: - HS được củng cố việc sử dụng câu lệnh lặp For....do để viết chương trình Pascal. - Rèn kĩ năng viết chương trình - Rèn ý thức hoạt động cá nhân và tập thể khoa học và sáng tạo, hiệu quả.. B. ChuÈn bÞ: - ThÇy: B¶ng phô vµ mét sè bµi tËp c¬ b¶n. - HS: Thực hiện theo HD ở tiết 46, SGK đầy đủ.. C. TiÕn tr×nh: 1. ổn định: KTSS, tư cách HS. 2. KiÓm tra bµi cò: HS: ViÕt có ph¸p c©u lÖnh lÆp For...do. Gi¶i thÝch ý nghÜa thùc hiÖn c©u lÖnh lÆp For...do HS kh¸c NX, GV NX chung vµ cho ®iÓm. 3. Bµi míi: Hoạt động của thầy và trò GV tæ chøc cho HS ch÷a mét sè bµi tËp trong SGK vÒ c©u lÖnh lÆp. trước hết GV yêu cầu HS nhắc lại ý nghĩa thùc hiÖn c©u lÖnh lÆp. Néi dung * C©u lÖnh lÆp For....do: For <biến đếm>:= < giá trị đầu> to <giá tị cuèi> do <c©u lÖnh>; Trong đó: - for, to, do: lµ c¸c tõ khãa HS đọc to đề BT3 (SGK – 60) - biến đếm: là biến đơn có kiểu HS hoạt động theo nhóm trả lời câu 3 (SGK nguyªn – 60) - Gi¸ trÞ ®Çu vµ gi¸ trÞ cuèi: lµ c¸c §¹i diÖn c¸c nhãm tr¶ lêi gi¸ trÞ nguyªn. Vµ gi¸ trÞ cuèi GV chèt l¹i ph¶i lín h¬n gi¸ trÞ ®Çu.. Bµi tËp 3 (SGK – 60) Chóng ta nãi r»ng khi thùc hiÖn c¸c. Lop8.net.

<span class='text_page_counter'>(11)</span> hoạt động lặp, chương trình kiểm tra một ®iÒu kiÖn. Víi lÖnh lÆp <biến đếm> := <giá trị ®Çu> to <gi¸ trÞ cuèi> do <c©u lÖnh>; cña Pascal, ®iÒu kiÖn cÇn ph¶i kiÓm tra chính là giá trị của biến đếm lớn hơn giá trị cuèi. NÕu ®iÒu kiÖn kh«ng ®­îc tháa m·n, câu lệnh được tiếp tục thực hiện; ngược lại, chuyÓn sang c©u lÖnh tiÕp theo trong chương trình. for. ? Bµi 5 (SGK – 61) yªu cÇu g×? HS đọc to đề và trả lời GV treo b¶ng phô BT 5 HS quan sát và hoạt động theo nhóm §¹i diÖn mét nhãm lªn tr×nh bµy c©u tr¶ lêi, cã gi¶i thÝch. HS kh¸c NX, GV nhËn xÐt chung vµ nhÊn m¹nh. Bµi tËp 5 (SGK – 61) C¸c c©u lÖnh Pascal sau cã hîp lÖ kh«ng, v× sao? a) for i:=100 to 1 do writeln('A'); b) for i:=1.5 to 10.5 do writeln('A'); c) for i=1 to 10 do writeln('A'); d) for i:=1 to 10 do; writeln('A'); e) var x: real; begin for x:=1 to 10 do writeln('A'); end.. Tr¶ lêi: Trừ d), tất cả các câu lệnh đều không hợp lÖ: a) Gi¸ trÞ ®Çu ph¶i nhá h¬n gi¸ trÞ cuèi; b) C¸c gi¸ trÞ ®Çu vµ gi¸ trÞ cuèi ph¶i lµ sè nguyªn; c) ThiÕu dÊu hai chÊm khi g¸n gi¸ trÞ ®Çu; d) Thõa dÊu chÊm ph¶y thø nhÊt, nÕu nh­ ta muốn lặp lại câu lệnh writeln(’A’)mười lần, ngược lại câu lệnh là hợp lệ; e) Biến x đã được khai báo như là biến có d÷ liÖu kiÓu sè thùc vµ v× thÕ kh«ng thÓ dùng để xác định giá trị đầu và giá trị cuối trong c©u lÖnh lÆp.. GV yêu cầu HS đọc to đề BT 6 (61) ? Bµi 6 yªu cÇu g×? HS: Mô tả thuật toán để tính tổng: 1 A = 1  1  1  ....... 1.3. 2.4. 3.5. Bµi tËp 6 (SGK – 61). n( n  1). ? Nêu hướng làm? HS suy nghĩ và đưa ra phương án làm ? Tæng A sÏ ®­îc tÝnh tæng theo c«ng thøc nµo?. Lop8.net. Hãy mô tả thuật toán để tính tổng sau đây (n lµ sè tù nhiªn ®­îc nhËp vµo tõ bµn phÝm): A = 1  1  1  ....... 1.3. LG:. 2.4. 3.5. 1 n( n  1).

<span class='text_page_counter'>(12)</span> HS:. Bước 1. Gán A  0, i  1.. 1 .trong đó i là biến đếm i (i  2). Bước 2. A . 1 . i (i  2). ? Nªu thuËt to¸n? GV có thể vừa vấn đáp HS vừa đưa ra thuật Bước 3. i  i + 1. toán để HS tham khảo. Bước 4. Nếu i ≤ n, quay lại bước 2. Bước 5. Ghi kết quả A và kết thúc thuật to¸n.. 4. Cñng cè: ? Nêu một số VD về hoạt hoạt động được thực hiện lặp lại trong cuộc sống hàng ngµy! HS lần lượt trả lời, GV có thể đưa ra một số VD khác để HS tham khảo: a) Hàng ngày em đặt đồng hồ báo thức lúc 6 giờ để dậy sớm tập thể dục. b) Hàng ngày (hoặc hàng tuần) bác lái xe khách lái xe để chuyên chở hành khách xuất phát từ một thời gian và địa điểm nhất định và đi theo một tuyến đường đã được xác định trước. c) Mỗi lần được khởi động, máy tính của em sẽ thực hiện cùng các hoạt động tự kiểm tra các thành phần máy tính, sau đó khởi động hệ điều hành theo một trình tự đã được quy định trước. ? H·y cho biÕt t¸c dông cña c©u lÖnh lÆp! HS trả lời, GV nhấn mạnh: Câu lệnh lặp 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!. 5. Hướng dẫn về nhà: - Xem lại các bài tập đã làm trong giờ. - Lµm tiÕp c¸c bµi tËp thªm sau: 1. Mét sè ng«n ng÷ lËp tr×nh, vÝ dô Pascal, kh«ng cã s½n hµm tÝnh lòy thõa. H·y m« tả thuật toán và sử dụng câu lệnh lặp với số lần xác định trước để viết chương trình Pascal tÝnh lòy thõa bËc n cña sè nguyªn X. 2. Viết chương trình Pascal nhập n số nguyên từ bàn phím và ghi ra màn hình số lớn nhất trong các số đó. Số n cũng được nhập vào từ bàn phím. (Xem mô tả thuật to¸n trong VÝ dô 6, Bµi 5.) 3. Viết chương trình Pascal nhập n số nguyên từ bàn phím và ghi ra màn hình số các số dương trong các số đó. Số n cũng được nhập vào từ bàn phím. (Xem Bài tập 5a, Bµi 5.). Lop8.net.

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