Bài 12. Kiểu xâu

BÀI GIẢNG
Kiểu Xâu
Kiểu xâu là gì?
Xâu là dãy các kí tự trong bộ 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 một xâu gọi là độ dài của xâu. Xâu có độ dài bằng 0 gọi là xâu rỗng.
Cách thức xác định
Tên kiểu xâu
Cách khai báo
Biến kiểu xâu
Các phép toán thao tác với xâu
Các tham chiếu tới phân tử của xâu

1. Khai baïo
var : string [d? dăi l?n nh?t c?a xđu];
V� d?
var Hoten: string[26]
Trong m� t? xđu c� th? b? ph?n khai bâo d?
dăi, ch?ng h?n:
var diachi: string;
2. Các thao tác xử lí xâu
Phép ghép xâu, lí hiệu là dấu công (+) được sử dụng dể ghép nhiều xâu thành một
Ví dụ:
Phép ghép xâu :
‘ Ha’ + ‘ Noi ’ + ‘ – ‘ + ‘ Viet Nam’
Cho xâu kết quả là ‘Ha Noi - Viet Nam’
b) Các phép so sánh bằng (=), khác (<>), nhỏ hơn (<), lớn hơn (>), nhỏ hơn hoặc bằng (<=), lớn hơn hoặc bằng (>=) có thứ tự ưu tiên thức hiện thấp hơn phép xâu và thực hiện việc so sánh hai xâu theo các quy tắc sau:
Xâu A là lớn hơn xâu B nếu như kí tự dầu tiên khác nhau giữa chúng kể từ trái sang trong xâu A có mã ASCII lớn hơn.
Nếu A và B là các xâu có dộ dài khác nhau và A là đoạn đầu cử B thì là nhỏ hơn B
Ví dụ:
` May tinh ` < ` May tinh cua toi `
c) Thủ tục delete(st, vt, n) thực hiện việc xoá n kí tự của biến xâu st bắt dầu từ vị trí vt.
Ví dụ
d) Thủ tục insert(s1, s2, vt) chèn xâu s1 vào xâu s2, bắt đầu ỏ vị trí vt.
e) Hàm copy(S, vt, N) tạo xâu gồm N kí tự liên tiếp bắt dầu từ vị trí vt của xâu S.
Ví dụ
Ví dụ
f) Hàm length(s) cho giá trị độ dài xâu s.
Ví dụ
g) Hàm pos(s1, s2) cho vị trí xuất hiện đầu tiên của xâu s1 trong xâu s2.
h) Hàm upcase(ch) cho chữ cái in hoa ứng với chữ cái trong ch.
Ví dụ
Ví dụ
MỘT SỐ VÍ DỤ
Ví dụ 1
Chương trình sau dưới đây nhập họ tên của hai người vào hai biến xâu và đưa ra màn hình xâu dài hơn, nếu bằng nhau thì đưa ra nhập sau.
Var
a, b: string
begin
write (` nhap ho ten thu nhat: ` ) ; readln (a) ;
write (` nhap ho ten thu hai: ` ) ; readln (b) ;
if length (a) > length (b) then write (a) else write (b) ;
readln
end.
Ví dụ 2
Chương trình sau nhập một xâu vào từ bàn phím và đưa ra màn hình xâu đó nhưng được viết ngược lại.
var i, k: byte;
a: string
begin
write (`nhap xau:`)
readln (a)
k:= length (a) ; {xac dinh do dai xau}
for i:= k downto 1 do write (a [i]) ;
readln
end.
DANH SÁCH THÀNH VIÊN
Chung Nhật Tân
Lê Văn Thường
Lê Trần Ái Thanh
Giáp Thanh Phong
Trần Anh Vũ
Nguyễn Thị Thu Thảo
Nguyễn Thị Thanh Thảo