GIÁO ÁN TIN HỌC LỚP 11
Ngày soạn: 28/11/2010
Ngày dạy:
Sinh viên: Thào Xuân Minh
Lớp: Sư phạm Tin K42
GVHD: Cô Ngô Thị Tú Quyên
KIỂU DỮ LIỆU XÂU (TIẾT 2)
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. ĐỒ DÙNG DẠY HỌC
1. Chuẩn bị của giáo viên
- Máy vi tính, máy chiếu projector, giáo án điện tử, sách giáo viên.
2. Chuẩn bị của học sinh
- Sách giáo khoa, vở ghi.
III. HOẠT ĐỘNG DẠY-HỌC
1. Ổn định tổ chức lớp: (1’)
Lớp: Tổng số: Vắng: Lí do:
2. Kiểm tra bài cũ: (8’)
Câu hỏi 1: (Chiếu slide 2 và đặt câu hỏi): Nêu cách khai báo biến kiểu
xâu?(2đ) Trình bày một số thao tác trên xâu kí tự?(2đ) Giải thích tác
dụng của từng hàm và thủ tục?(4đ)
1
Câu hỏi 2: (Chiếu slide 3 và đặt câu hỏi): Lấy ví dụ khai báo biến S có
độ dài 30?(1đ) Cho biết kết quả vết ra màn hình sau khi thực hiện 2 câu

GV Dẫn dắt: Chúng ta tiếp tục sang phần 3. Một số ví dụ.
NỘI DUNG GHI
BẢNG
HOẠT ĐỘNG CỦA
GIÁO VIÊN
HOẠT ĐỘNG CỦA HỌC
SINH
3. Một số ví dụ:
 Ví dụ 1:
+ Input: Xâu a,b là họ
tên của hai người.
+ OutPut: In ra màn
hình xâu dài hơn.
Begin

If Length(a)>Length(b)
Then write(a)
else write(b);
End.
 Ví dụ 2:
+ Input: 2 Xâu a,b.
+ OutPut: In ra màn
hình thông báo 2 xâu
trùng nhau hay không.
Begin

If a[1]=b[x] Then
- Chiếu Slide 5: bài
12. Kiểu dữ liệu xâu
(tiết 2)

xâu dài hơn.
- Hàm length(s).
- Chú ý theo dõi và ghi bài
vào vở.
- Ghi ví dụ vào vở.
- Input: 2 Xâu a,b.
- OutPut: In ra màn hình
thông báo 2 xâu trùng
nhau hay không.
- Hàm Length(S);
3
?
?
?
?
write(‘Trung nhau’)
else
write(‘Khac nhau’);
End.
 Ví dụ 3:
+ Input: Xâu a.
+ OutPut: In ra màn
hình xâu ngược lại của
xâu a.
Begin

K:=length(a);
For i:=k downto 1 do
Write(a[i]);
End.

chương trình như sau:
Chiếu tiếp slide 7 và
giải thích chương
trình.
- Chiếu slide 9:
- Ghi bảng: Ví dụ
4:
Các em hãy đọc
kĩ đề bài và xác định
input, output cho
thầy?
Để xóa được các
dấu cách trong xâu ta
phải làm thế nào?
- Các bước giải và
- Chú ý theo dõi máy
chiếu và ghi bài vào vở.
- Ghi ví dụ vào vở.
+ Input: Xâu a.
+ OutPut: In ra màn hình
xâu ngược lại của xâu a.
- Ta duyệt các kí tự từ cuối
xâu lên đầu xâu. Mỗi lần
duyệt ta in ra các kí tự đó.
- Chú ý theo dõi máy
chiếu và ghi bài vào vở.
- Ghi ví dụ vào vở.
- Input: Xâu a.
- OutPut: Xâu tạo được từ
xâu a nhưng đã loại bỏ dấu

writeln(‘Ket qua:
’,s2);
End.
chương trình như sau:
Chiếu tiếp slide 7 và
giải thích chương
trình.
- Chiếu slide 10:
- Ghi bảng: Ví dụ
5:
Các em hãy đọc
kĩ đề bài và xác định
input, output cho
thầy?
Các kí tự số là các
kí tự như thế nào?
Hãy nêu thuật
toán để giải bài toán
trên?
- Chiếu slide 11:
Thuật toán giải bài
toán và ví dụ.
Viết chương trình
dựa vào thuật toán
trên?
- Chiếu slide 12:
Chương trình giải bài
toán và giải thích.
- Ghi ví dụ vào vở.
- Input: Xâu s1.

2. Dặn dò:(1’)
- Các em về nhà học bài và giải bài tập số 10 trang 80.
- Làm lại ví dụ 4 nhưng không dùng xâu b mà hãy dùng hàm
Delete(St,vt,n) để xóa các kí trống trong xâu.
- Đọc trước cho thầy bài bài tập và thực hành số 5 trang 73 SGK.
V. RÚT KINH NGHIỆM
6