Giáo án Tin học lớp 11 - Bài 12: Kiểu xâu (tiếp)

<span class='text_page_counter'>(1)</span> Gi¸o ¸n gi¶ng d¹y.  Bé m«n: Tin häc 11 Bµi 12: KIỂU XÂU (tiÕp) (TiÕt PPCT: 28) 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:. 1. KiÕn thøc - Biết được lợi ích của các hàm và thủ tục liên quan đến xâu trong ngôn ngữ lập trình Pascal. - Nắm được cấu trúc chung và chức năng của một số hàm và thủ tục liên quan đến x©u cña ng«n ng÷ lËp tr×nh Pascal. 2. KÜ n¨ng - Nhận biết và bước đầu sử dụng được một số hàm và thủ tục để giải quyết một số bài tập đơn giản liên quan. II. ChuÈn bÞ:. 1. Gi¸o viªn: Gi¸o ¸n gi¶ng d¹y, m¸y chiÕu ®a n¨ng 2. Häc sinh: Sách giáo khoa, sách bài tập Tin học 10, vở ghi III. hoạt động dạy và học. 1. Hoạt động 1: Tìm hiểu về một số hàm và thủ tục liên quan đến xâu trong ngôn ngữ lËp tr×nh Pascal. a. Môc tiªu - Học sinh biết được một số hàm và thủ tục liên quan đến xâu. Nắm được cấu trúc chung, hiÓu ®­îc c¸c tham sè cña hµm vµ thñ tôc. - BiÕt ®­îc chøc n¨ng cña c¸c hµm vµ thñ tôc chuÈn. b. Néi dung - Thñ tôc Delete(st,vt,n) thùc hiÖn viÖc xo¸ ®i trong x©u st gåm n kÝ tù, b¾t ®Çu tõ vÞ trÝ vt. - Thñ tôc Insert(st1,st2,vt) thùc hiÖn viÖc chÌn x©u st1 vµo x©u st2 b¾t ®Çu tõ vÞ trÝ vt. - Hµm Copy(st,vt,n) cho gi¸ trÞ lµ mét x©u kÝ tù ®­îc lÊy trong x©u st, gåm n kÝ tù liªn tiÕp b¾t ®Çu tõ vÞ trÝ vt cña x©u st. - Hµm Post(st1,st2) cho gi¸ trÞ lµ vÞ trÝ xuÊt hiÖn ®Çu tiªn cña x©u st1 trong x©u st2. - Hàm UpCase(ch) cho giá trị là kí tự hoa tương ứng với kí tự ch. c. Các bước tiến hành Hoạt động của giáo viên Hoạt động của học sinh 1. Giíi thiÖu cÊu tróc chung cña hµm 1. Quan s¸t cÊu tróc chung. length(st) lªn b¶ng. - Length: là tên hàm, có nghĩa là độ dài, - Hái: ý nghÜa cña Length vµ cña st? st: lµ mét biÓu thøc x©u kÝ tù. - Chiếu chương trình ví dụ:  GV: §ç ThÞ Thu HiÒn Lop11.com.

<span class='text_page_counter'>(2)</span>  Gi¸o ¸n gi¶ng d¹y.  Bé m«n: Tin häc 11. Var st:string; Begin st:= ‘Ha Noi’; Write(length(st)); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Hái: Chøc n¨ng cña hµm length() lµ g×? - Chiếu đề bài tập ứng dụng: Viết chương tr×nh nhËp mét x©u, in ra mµn h×nh sè kÝ tù ‘a’ cã trong x©u. 2. Giíi thiÖu cÊu tróc chung cña hµm Upcase(ch). - Chiếu chương trình ví dụ: Var ch:char; Begin ch:= ‘h’; Write(upcase(ch)); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Hái: Chøc n¨ng cña hµm upcase()? - Chiếu bài tập ứng dụng: Viết chương tr×nh nhËp mét x©u, in ra mµn h×nh x©u đó dạng in hoa.. - Quan sát chương trình để dự tính kết qu¶.. - KÕt qu¶ lµ: 6 - Quan sát kết quả của chương trình. - Hàm cho số lượng kí tự của xâu st.. 2. Quan s¸t cÊu tróc chung cña hµm Upcase. - Quan sát chương trình để dự tính kết qu¶.. - KÕt qu¶ lµ: H. - Quan sát kết quả của chương trình. - Cho gi¸ trÞ lµ ch÷ c¸i in hoa cña ch. Var st:string; Begin readln(st); For i:=1 to length(st) do write(upcase(st[i])); 3. Giíi thiÖu cÊu tróc chung cña hµm 3. Quan s¸t cÊu tróc chung cña hµm Pos(s1,s2). Post và các ví dụ để biết chức năng. - Chiếu chương trình ví dụ: Var vt:byte; Begin - Quan sát chương trình để dự tính kết ch:= ‘h’; qu¶. vt:=Pos(‘cd’, ‘abcdefcd’); Write(vt); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - KÕt qu¶ lµ: 3  GV: §ç ThÞ Thu HiÒn Lop11.com.

<span class='text_page_counter'>(3)</span>  Gi¸o ¸n gi¶ng d¹y.  Bé m«n: Tin häc 11. - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Hái: Chøc n¨ng cña hµm pos? - Thay tham sè cña hµm Pos trong chương trình bằng Pos(‘k’, ‘abc’). Hỏi kÕt qu¶ cña hµm b»ng bao nhiªu? - Chiếu bài tập ứng dụng: Viết chương tr×nh nhËp vµo mét x©u st. XÐt xem trong x©u cã dÊu c¸ch hay kh«ng?. - Quan sát kết quả của chương trình. - Hµm cho gi¸ trÞ lµ mét sè nguyªn lµ vÞ trÝ cña x©u st2 trong x©u st2. - B»ng kh«ng 0.. Var st:string; Begin readln(st); if post(‘ ’,st)<>0then write(‘Co’) else write(‘Khong’); End. - Hái: Cã c¸ch gi¶i nµo kh¸c? - Có thể sử dụng For để tìm dấu cách trong x©u. 4. Giíi thiÖu cÊu tróc chung cña hµm 4. Quan s¸t cÊu tróc chung cña hµm copy(st,vt,n). copy và ví dụ để biết chức năng. - Chiếu chương trình ví dụ: - Quan sát chương trình để dự tính kết qu¶. Var st:tring; Begin st:=copy(‘bai tap’,3,4); Write(st); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - KÕt qu¶ lµ: ‘i ta’ - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Quan sát kết quả của chương trình. - Hái: Chøc n¨ng cña hµm copy? - Hµm cho gi¸ trÞ lµ mét x©u kÝ tù ®­îc - Thay c¸c tham sè cña hµm copy trong l©y trong x©u st, gåm n kÝ tù b¾t ®Çu t¹i vÞ chương trình ví dụ trên như sau và hỏi kết trí vt. qu¶ in ra mµn h×nh: Copy(‘abc’,1,5) Copy(‘abc’,5,2) Cho gi¸ trÞ lµ: ‘abc’ Copy(‘abc’,1,0) Cho gi¸ trÞ lµ x©u rçng - Thực hiện chương trình để học sinh thấy Cho giá trị là xâu rỗng kÕt qu¶. - Quan sát kết quả của chương trình để kiÓm nghiÖm suy luËn. 5. Giíi thiÖu cÊu tróc chung cña thñ 5. Quan s¸t cÊu tróc chung cña thñ tôc tôc delete(st,vt,n); delete vµ c¸c vÝ dô. - Chiếu chương trình ví dụ:  GV: §ç ThÞ Thu HiÒn Lop11.com.

<span class='text_page_counter'>(4)</span>  Gi¸o ¸n gi¶ng d¹y.  Bé m«n: Tin häc 11. Var st:tring; Begin st:= ‘HaNoi’; delete(st,3,2); Write(st); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Hái chøc n¨ng cña thñ tôc delete(); - Thay lÖnh g¸n st:= ‘HaNoi’; vµ thñ tôc xo¸ bëi c¸c lÖnh sau vµ hái kÕt qu¶ in ra mµn h×nh. st:=‘abc’; Delete(st,1,5); st:=‘abc’; Delete(st,5,2); st:=‘abc’; Delete(st,1,0); - Chiếu bài tập ứng dụng: Viết chương tr×nh nhËp mét x©u vµ xo¸ ®i c¸c dÊu c¸ch thõa ë ®Çu x©u.. - Quan sát chương trình để dự tính kết qu¶.. st= ‘Hai’ - Quan sát kết quả của chương trình. - Thñ tôc thùc hiÖn viÖc xo¸ ®i trong biÕn x©u st gåm n kÝ tù, b¾t ®Çu tõ vÞ trÝ vt. st:=‘’; x©u rçng. st:=‘abc’; st:=‘abc’;. Var st:tring; begin readln(st); while st[1]= ‘ ’ do delete(st,1,1); writeln(st); readln; end. 6. Giíi thiÖu cÊu tróc chung cña thñ 6. Quan s¸t cÊu tróc chung cña thñ tôc tôc Insert(st1,st2,vt); Inser. - Chiếu chương trình ví dụ: - Quan sát chương trình để dự tính kết Var st1,st2:tring; qu¶. Begin st2:= ‘HaNoi’; st1:= ‘ ’; Insert(st1,st2,3); Write(st); readln; End. - Hỏi: Kết quả của chương trình in ra màn h×nh? - KÕt qu¶ st2=‘Ha Noi’ - Thực hiện chương trình để học sinh thấy kÕt qu¶. - Quan sát kết quả của chương trình. - Hái chøc n¨ng cña thñ tôc insert(); - Thay lÖnh g¸n st2:=‘HaNoi’; vµ thñ tôc - Thñ tôc thùc hiÖn viÖc chÌn x©u st1 vµo chÌn bëi c¸c lÖnh nh­ sau vµ hái kÕt qu¶:  GV: §ç ThÞ Thu HiÒn Lop11.com.

<span class='text_page_counter'>(5)</span>  Gi¸o ¸n gi¶ng d¹y.  Bé m«n: Tin häc 11. st2:= ‘ef’; Insert(‘abc’,st2,5); st2:= ‘ef’; Insert(‘abc’,st2,0);. trong biÕn x©u st2 b¾t ®Çu t¹i vÞ trÝ vt. st2= ‘efabc’; st2= ‘abcef’;. 2. Hoạt động 2: Rèn luyện kĩ năng vận dụng hàm và thủ tục. a. Môc tiªu: - Học sinh biết sử dụng hàm và thủ tục để giải quyết một số bài toán đơn giản. Linh ho¹t trong viÖc lùa chän hµm hoÆc thñ tôc. b. Néi dung - Viết chương trình nhập vào một xâu và xóa đi các dấu cách thừa có trong xâu, chỉ để lại một dấu cách giữa hai từ. c. Các bước tiến hành Hoạt động của giáo viên 1. Xác định bài toán - Chiếu nội dung đề bài lên bảng. - Xác định dữ liệu vào, dữ liệu ra.. Hoạt động của học sinh 1. Quan sát, suy nghĩ để trả lời.. - Hái: Trong bµi nµy, ta cÇn sö dông nh÷ng hµm vµ thñ tôc nµo? 2. Chia líp lµm 3 nhãm. Yªu cÇu viÕt chương trình lên bìa trong. - Thu phiÕu tr¶ lêi. ChiÕu kÕt qu¶ lªn b¶ng. Gäi häc sinh nhãm kh¸c nhËn xÐt, đánh giá và bổ sung. 3. Chiếu chương trình mẫu giáo viên đã viết để chính xác hoá lại cho học sinh.. - Hµm Pos(), thñ tôc delete();. - Vµo: Mét x©u kÝ tù bÊt k×. - Ra: Mét x©u chØ cã 1 kÝ tr¾ng gi÷a 2 tõ. - Hái: C¸c nhiÖm vô chÝnh khi gi¶i quyÕt - Xo¸ mäi dÊu c¸ch thõa ®Çu x©u vµ cuèi bµi to¸n nµy? x©u. - Xo¸ c¸c dÊu c¸ch thõa gi÷a hai tõ. 2. Thảo luận theo nhóm để viết chương tr×nh. - Th«ng b¸o kÕt qu¶. - NhËn xÐt vµ bæ sung nh÷ng thiÕu sãt cña nhãm kh¸c. 3. Quan s¸t vµ ghi nhí.. IV. §¸nh gi¸ cuèi bµi 1. Những hàm và thủ tục liên quan đến xâu Thñ tôc Delete(st,vt,n) ; Thñ tôc Insert(st1,st2,vt); Hµm Copy(st,vt,n); Hµm Length(st), Hµm Pos(st1,st); Hµm UpCase(ch) 2. C©u hái vµ bµi tËp vÒ nhµ - Gi¶i bµi tËp sè 10 trang 80. - Viết chương trình nhập một xâu. In ra màn hình số từ có trong xâu. - Xem phÇn néi dung cña bµi thùc hµnh sè 5, s¸ch gi¸o khoa trong 73. - Chuẩn bị một số bài tập để thực hành..  GV: §ç ThÞ Thu HiÒn Lop11.com.

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