Bài tập và thực hành 5

<span class='text_page_counter'>(1)</span>Bài tập và thực hành 5 I.Mục tiêu 1. Về kiến thức - Củng cố cho học sinh những hiểu biết về xâu kí tự, đặc biệt là các thủ tục và hàm liên quan đến xâu. - Nắm được một số thuật toán cơ bản : tạo xâu mới, đếm số lần xuất hiện 1 ký tự… 2. Về kĩ năng - Khai báo được biến kiểu xâu - Nhập, xuất giá trị cho biến xâu. - Duyệt qua được tất cả các ký tự của xâu. - Sử dụng được các hàm và thủ tục chuẩn. II. Chuẩn bị: 1.Giáo viên: Giáo án, SGK, bảng phụ. 2. Học sinh: SGK, bài tập chuẩn bị sẵn ở nhà III.Phương pháp – Phương tiện dạy học: - Thuyết trình, gợi mở, vấn đáp. - Bảng đen, giáo án, bảng phụ. IV. Tiến trình dạy học: 1.Ổn định lớp, kiểm tra sĩ số 2.Kiểm tra bài cũ: Em hãy cho biết thủ tục Insert(S1,S2,n) làm công việc gì? Cho ví dụ minh họa? 3.Nội dung bài học Nôi dung bài giảng Bài tập 1. SGK. Hoạt động của Thầy Hoạt động của Trò - Giới thiệu nội dung đề Quan sát, đọc kĩ yêu bài lên bảng. cầu bài toán. - GV diễn giải: Một xâu Chú ý nghe giảng. được gọi là Palindrome nếu ta đọc các ký tự từ phải sang trái sẽ giống khi đọc từ trái sang phải. - Cho ví dụ minh họa: Xâu ‘1234321’, abcddcba,. Nôi dung bài giảng. aabaa,. Hoạt động của Thầy -Yêu cầu học sinh cho ví dụ về xâu Palindrome. - Gọi học sinh khác nhận. Lop11.com. Hoạt động của Trò - Học sinh trả lời: ……………………… - Học sinh nhận xét:.

<span class='text_page_counter'>(2)</span> Chương trình Var i, x:Byte; a,p:string; Begin Write(‘nhap vao mot xau’); readln(a); x:=length(a); p:= ‘ ’; For i:=x downto 1 do p:=p+a[i]; If a=p then write(‘xau la Palidrom’) else write(‘xau khong la Palidrom’); Readln; End.. xét. - GV nhận xét lại - Viết chương trình bài toán lên bảng - Thế theo các em xâu p trong chương trình có tác dụng gì?. …………………… - Học sinh lắng nghe giảng và ghi ví dụ đúng vào vở. - Quan sát chương trình trên bảng. - Học sinh trả lời: ……………………….. - Làm sao để biết được xâu - Học sinh trả lời: đó có phải là xâu ………………………. Palindrome hay không? -Theo em ta có thể không dùng đến xâu p mà vẫn biết xâu đó có đối xứng hay không?. - Học sinh trả lời: ………………………. - Học sinh chú ý nghe giảng. -GV: Nhận xét và đưa ra kết luận : +Ta có thể so sánh phần - Học sinh chú ý nghe tử thứ nhất với phần tử cuối giảng cùng, phần tử thứ 2 với phần tử kề cuối,….. +Khi đó ta chỉ cần cho vòng for chạy đến vị trí giữa là được. -GV: yêu cầu học sinh lên bảng viết chương trình, các em còn lại lấy giấy nháp ra làm. - Giáo viên quan sát và đôn đốc học sinh làm bài.. Nôi dung bài giảng Chương trình: Program bai_1b. Uses Crt;. - Học sinh lên bảng làm bài, các học sinh ở dưới làm bài vào giấy nháp.. Hoạt động của Thầy. Hoạt động của Trò. GV: Nhận xét và viết chương trình lên bảng để. Học sinh quan sát chương trình trên. Lop11.com.

<span class='text_page_counter'>(3)</span> Var i, x: byte; học sinh đối chiếu với bài a : string; làm của mình . t: boolean; Begin write (‘ Nhap xau: ‘); readln(a); x: = length(a); t:= true; for i:=1 to x div 2 do if a[i]<>a[x-i+1] then t:=false; if t then write(‘ Xau doi xung’) else write(‘ Xau khong doi xung’); readln; End.. bảng và ghi bài vào vở của mình. IV.Củng cố, dặn dò - Nhắc lại những sai sót mà học sinh mà gặp phải khi thực hiên thao tác với xâu. - Xem lại bài, chuẩn bị làm bài tập 2, 3 SGK. V.Rút kinh nghiệm: ....................................................................................................................................... ........................................................................................................................................ Lop11.com.

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