Sử dụng c©u lÖnh for – do ChuÈn bÞ vµ lªn b¶ng thùc hiÖn HS kh¸c nhËn xÐt Quan sát chương trình giáo viên đã chuÈn hãa... ChuÈn bÞ vµ lªn b¶ng thùc hiÖn HS kh¸c nhËn xÐt Quan sát chương [r]
(1) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 Bµi tËp (TiÕt PPCT: 17) Ngµy so¹n: Ngµy ®¨ng ký gi¸o ¸n: Người duyệt giáo án (TTCM duyệt, BGH duyệt): I Môc tiªu: KiÕn thøc: - Cñng cè thªm vÒ cÊu tróc rÏ nh¸nh - LuyÖn tËp cÊu tróc lÆp - Tiếp tục làm quen với các công cụ phục vụ hiệu chỉnh chương trình KÜ n¨ng: - Bước đầu biết viết chương trình có sử dụng các cấu trúc rẽ nhánh và cấu trúc lÆp trªn ng«n ng÷ Turbo Pascal Thái độ: Tự giác, tích cực và chủ động làm bài tập II ChuÈn bÞ: Gi¸o viªn: - ChuÈn bÞ gi¸o ¸n gi¶ng d¹y - Phòng máy, máy chiếu đa năng, cài đặt đầy đủ Turbo Pascal Häc sinh: S¸ch gi¸o khoa, bµi tËp III Tæ chøc d¹y vµ häc: Hoạt động 1: Rèn luyện kĩ câu lệnh rẽ nhánh a Môc tiªu; ViÕt ®îc c©u lÖnh rÏ nh¸nh thÓ hiÖn mét sè thao t¸c tÝnh to¸n b Néi dung: Lµm BT4 trang 51 c Các bước tiến hành: Hoạt động giáo viên Hoạt động học sinh - GV viết đề lên bảng và yêu cầu HS thực viết - HS thực c©u lÖnh rÏ nh¸nh tÝnh z - Gäi HS lªn b¶ng tr×nh bµy lêi gi¶i cña m×nh - Gäi HS kh¸c nhËn xÐt - HS nhËn xÐt - GV nhận xét, đánh giá bài làm và chuẩn hóa lại lêi gi¶i a) if (sqr(x)+ sqr(y))<=1 then z:=sqr(x) + sqr(y) else if y>=x then z:=x+y else z:=0.5; b) if (sqr(x-a) + sqr(y-b))<=sqr(r) then z:= abs(x) + abs(y) else z:=x+y; GV: §ç ThÞ Thu HiÒn Lop11.com (2) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 Hoạt động 2: Rèn kuyện kĩ sử dụng cấu trúc for - a) Môc tiªu: Học sinh vận dụng cấu trúc for - vào để giải bài tập trang 51 b) Néi dung: Lµm bµi tËp s¸ch gi¸o khoa trang 51 c) Các bước tiến hành: Hoạt động giáo viên Hoạt động học sinh BT5: LËp tr×nh tÝnh 50 n n 1 n a y Y/c HS đọc, nghiên cứu đề bài để giải bài toán - GV gîi ý: 2 3 + y §äc vµ nghiªn cøu bµi tËp Chó ý gîi ý cña GV n víi n=1, 2, 3, …, 50 n 1 + Gi¶ sö y:=0 th× mçi lÇn sÏ céng vµo y bao nhiªu? + ViÖc céng vµo sÏ thùc hiÖn bao nhiªu lÇn? + Thao tác lặp này ta đã biết trước số lần lặp chưa? + Các biến cần sử dụng chương trình - Từ gợi ý trên y/c HS lập chương trình giải bài to¸n - Cho HS chuẩn bị phút sau đó gọi em lên b¶ng thùc hiÖn - Gäi mét sè HS kh¸c nhËn xÐt - GV nhận xét và chuẩn hóa lại chương trình Chương trình: Uses crt; Var y: real; n: byte; Begin CLRSCR; y:=0; for n:=1 to 50 y:=y+n/(n+1); Writeln(y:10:4); Readln End 1 1 x10 1! 2! n! n! b e(n) §a gi¸ trÞ e(n) mµn h×nh - Y/c HS đọc, nghiên cứu đề bài để giải bài toán - GV gîi ý: 1 1 1 1 e(n) 1! 1! 2! (n 1)! n GV: §ç ThÞ Thu HiÒn Lop11.com Céng vµo y mét gi¸ trÞ lµ n n 1 Céng 50 lÇn Lặp với số lần biết trước Sử dụng c©u lÖnh for – ChuÈn bÞ vµ lªn b¶ng thùc hiÖn HS kh¸c nhËn xÐt Quan sát chương trình giáo viên đã chuÈn hãa (3) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 1 1 e(n) ( ) 2! (n 1)! n 1 1 e(n)= 2+ gt mµ gt= 2! (n 1)! n Gi¸ trÞ gt ®îc tÝnh theo quy luËt nµo? - Từ gợi ý trên y/c HS lập chương trình giải bài to¸n - Cho HS chuẩn bị phút sau đó gọi em lên b¶ng thùc hiÖn - Gäi mét sè HS kh¸c nhËn xÐt - GV nhận xét và chuẩn hóa lại chương trình Chương trình: Uses crt; Var n: longint; e, gt: real; Begin CLRSCR; gt:=1/2; n:=2; e:= 2+gt; While gt>=2*1E-6 Begin inc(n); gt:=gt*(1/n); e:=e+gt; End; Writeln(‘Gia tri cua e(n) la: ’, e:10:5); Readln End GV: §ç ThÞ Thu HiÒn Lop11.com ChuÈn bÞ vµ lªn b¶ng thùc hiÖn HS kh¸c nhËn xÐt Quan sát chương trình giáo viên đã chuÈn hãa (4) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 GV: §ç ThÞ Thu HiÒn Lop11.com (5)