Giáo án số 2
Kiểu dữ liệu xâu
Giảng viên hướng dẫn: Thầy Trần Doãn Vinh.
Sinh viên thực hiện: Lê Văn Đảm.
Lớp: k56A_CNTT.
A.Mục đích yêu cầu:
 Biết xâu là một dãy ký tự (có thể coi xâu là một mảng một
chiều) .
 Biết cách khai báo xâu, truy cập phần tử của xâu .
 Sử dụng được một số thủ tục, hà thông dụng về xâu .
 Viết được một số chương trình đơn giản có sử dụng xâu .
⇒ Giúp học sinh nắm được kiến thức liên quan tới xâu; biết cách vận
dụng viết một số chương trình đơn giản liên quan tới xâu; từ đó làm cho học
sinh yêu thích và hứng thú với môn học.
B.Phương pháp – phương tiện
1. Phương pháp
Kết hợp các phương pháp giảng dạy như thuyết trình, vấn đáp, vẽ hình
minh hoạ…
2. Phương tiện
o Sách giáo khoa Tin học 11.
o Vở ghi lý thuyết Tin học 11.
o Sách tham khảo (nếu có).
o Máy tính, máy chiếu, màn chiếu.
C.Tiến trình lên lớp, nội dung bài giảng
I. Ổn định lớp (1’)
Yêu cầu lớp trưởng báo cáo sĩ số
II. Kiểm tra bài cũ và gợi động cơ (5’)
Trong bài học trước chúng ta đã được làm quen với một trong số
những kiểu dữ liệu có cấu trúc đó là kiểu mảng và biến có chỉ số.
Câu hỏi kiểm tra bài cũ :
1.Em hãy cho biết trong những cách khai báo sau, cách khai báo nào

chung .
-Ta nên lựa chọn cách
khai báo biến kiểu xâu
cho phù hợp.
-Đây là cách khai báo
trong ngôn ngữ Pascal,
trong các ngôn ngữ khác
nhau có thể có cách khai
báo khác nhau .
Độ dài tối đa của xâu phụ
Một số khái niệm:
- Xâu là một dãy kí tự trong bảng mã ASCII .
- Mỗi kí tự được gọi là một phần tử của xâu .
- Số lượng kí tự trong xâu được gọi là độ dài
của xâu .
- Xâu có độ dài bằng 0 gọi là xâu rỗng.
- Tham chiếu tới phần tử trong xâu được xác
định thông qua chỉ số của phần tử trong
xâu .
- Chỉ số phần tử trong xâu thường được đánh
số là 1 .
- Trong ngôn ngữ Pacal, tham chiếu tới phần
tử thường được viết :
<Tên biến xâu>[chỉ số]
1.Khai báo kiểu dữ liệu xâu
- Để khai báo kiểu dữ liệu xâu, Pascal dùng tên
riêng STRING. Độ dài tối đa của xâu được viết
trong [ ] sau từ khóa STRING . Khai báo như
sau :
VAR <Tên biến > : STRING [độ dài lớn

- Ví dụ: Var hoten : string [25];
Ta cũng có thể khai báo
var hoten : string [];
Khi đó độ dài lớn nhất của xâu được ngầm định
là 255.
- Chú ý: Hằng xâu kí tự được đặt trong cặp
nháy đơn‘ ’.
2.Các thao tác xử lí xâu
- Tham chiếu tới phần tử của xâu được xác
định bởi tên xâu và chỉ số đặt trong [].
- Các kí tự được đánh số bắt đầu từ 1.Có thể
xem xâu là mảng một chiều mà mỗi phần tử là
một kí tự.
- Với dữ liệu kiểu xâu có thế thực hiện phép
toán ghép xâu và phép toán quan hệ
Phép ghép xâu (kí hiệu là +): ‘lớp’ + ’k56a’
cho xâu kết quả là: ‘lớp k56a’.
Các phép so sánh =, <>, <, >, <=, >= Pascal
tự động so sánh lần lượt từ kí tự từ trái sang
phải.Ví dụ : ‘AB’ < ‘AC’, ‘ABC’ > ‘ABB’,
‘ABC’ <’ABCD’.
Một số thủ tục chuẩn dùng để xử lí
xâu :
• Delete(st, vt, n) : xoá n kí tự của xâu st từ vị
trí vt
• Inser(s1, s2, vt) : chèn xâu s1 vào xâu s2 bắt
đầu ở vị trí vt.
• Val(St,x,m) Đổi giá trị xâu St thành số ghi
giá trị vào biến X, nếu không đổi được thì vị
trí gây lỗi ghi trong m, nếu đổi thành công

• Copy(St,vt,n) sao chép từ xâu St n kí tự từ
vị trí vt .
• Length(s): cho giá trị là độ dài xâu s
• Pos (s1, s2): cho vị trí xuất hiện đầu tiên của
xâu s1 trong xâu s2
• Upcase(ch): cho chữ cái viết hoa ứng với
chữ cái trong ch
• Pos(S1,S2): tìm vị trí xuất hiện đầu tiên của
S1 trong S2 .
• Length(St): cho độ dài xâu St .
• Upcase(ch): cho chữ cái viết hoa tương ứng
với chữ thường trong ch .
• CHR(X): cho kí tự có mã X trong bảng mã
ASCII .
• Ord(ch): cho mã của kí tự ch trong bảng mã
.
3.Ví dụ
Ví dụ 1:Viết chương trình nhập tên của hai
người từ bàn phím, đưa ra màn hình tên dài
hơn, nếu bằng nhau thì đưa ra xâu nhập sau.
Program vidu1;
User crt;
Var
Xau1, Xau2 : string;
Begin
Clrscr;
Write(‘nhap ho ten thu nhat ’);
Readln(Xau1);
Write(‘nhap ho ten thu hai ’);
Readln(Xau2);

Write(x[i]) ;
Readln ;
End .
Ví dụ 3:Viết chương trình nhập xâu từ bàn
phím đưa ra màn hình xâu thu được sau khi đã
loại bỏ các dấu cách.
Progam VD2;
User crt;
Var
x : string;
i, : byte;

Begin
Write (‘nhap xau ’); readln (x);
For i:=1 to length(x) do
If x[i]= ‘ ’ then delete(x,i,1);
Writeln(‘ xau khi da loai bo dau cach
la: ’,x);