Biểu thức gồm các toán hạng là biến xâu, biến kí tự hoặc hằng xâu được gọi là biểu thức xâu.
- Dữ liệu kiểu xâu là dãy các kí tự.
- Một xâu là một dãy các kí tự (trong bảng mã ASCII), có thể coi xâu như một mảng một chiều mà mỗi phần tử là một kí tự. Số lượng kí tự trong một xâu được gọi là độ dài của xâu. Xâu có độ dài bằng 0 là xâu rỗng.
Các ngôn ngữ lập trình đều có quy tắc, cách thức cho phép xác định:
- Biểu thức gồm các toán hạng là biến xâu, biến kí tự hoặc hằng xâu được gọi là biểu thức xâu
var <tên biến>: string[độ dài lớn nhất của xâu]
Lưu ý: Độ dài lớn nhất của xâu < 255.
Khi đó, độ dài lớn nhất của xâu sẽ nhận giá trị mặc định là 255.
2. Các thao tác xử lí xâu
a) Phép ghép xâu được dùng để ghép nhiều xâu thành một (kể cả đối với các hằng và biến xâu).
Ví dụ: 'Nghe' + 'An' . Kết quả: Nghe An
b) Các phép so sánh: (=), (o), (<), (>),(<=), (>=) có thứ tự ưu tiên thực hiện thấp hơn phép ghép xâu và thực hiện việc so sánh hai xâu theo quy tắc sau:
Ví dụ: 'Que huong' < 'Que huong toi'.
Ví dụ: 'Ha noi' = 'Ha noi'
c) Thủ tục delete(st, V/, n) thực thực việc xóa n kí tự của biến xâu st bắt đầu từ vị trí vt.
Ví dụ: st='abcdef’; thao tác delete (st, 4, 2 ) , cho kết quả 'abcd'
d) Thủ tục insert (s1, s2, vt) chèn xâu s1 vào biến xâu s2, bắt đầu ở ví trí Vt.
Ví dụ: 1l='PC'; s2= ' IBM486 thao tác insert (s1, s2, 4);chokếtquả 'IBMPC486'
e) Hàm copy(S, vt, N) tạo xâu gồm N kí tự liên tiếp bắt đầu từ vị trí vt của xâu s.
Vi dụ: S='Bai hoc thu 9'; biểu thức copy ( s, 9, 5); cho kết quả 'thu 9'
f) Hàm length(s) cho giá trị là độ dài xâu s.
Vi dụ: s= 'Tin hoc' thì biểu thức length (S) có độ dài là 7.
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.
Ví dụ: s2='abcdef' thì biểu thức pos ('cd', s2) cho kết quả 3.
h) Hàm upcase(ch) cho chữ cái in hoa ứng với chữ cái trong ch.
Ví dụ: 'd' thì biểu thức upcase (ch) cho kết quả ' D'.
- Xâu được tạo thành bởi các kí tự, trong đó có thể có dấu cách. Dấu cách thể hiện trong các văn bản là phần trống ngăn cách giữa hai từ viết liên tiếp. Kí tự này được gõ bằng phím dài nhất trên bàn phím (Space Bar);
- Trong chương trình, khi viết một xâu kí tự, ta phải viết xâu đó giữa hai dấu nháy đơn. Nhưng khi nhập từ bàn phím giá trị một xâu, ta chỉ gõ các kí tự thuộc xâu đó (rồi nhấn phím Enter).
- Xâu chỉ gồm một dấu cách được viết là ' '. Để viết xâu rỗng ta viết hai dấu nháy đơn liền nhau.
- Khi so sánh hai xâu, xâu có độ dài nhỏ hơn có thể là xâu lớn hơn (>), ví dụ:
- Khi sử dụng lệnh gán, ta có thể gán trị là một kí tự cho một biến xâu kí tự nhưng việc gán trị là một xâu kí tự cho một biến kiểu kí tự là không hợp lệ dù xâu đó có độ dài bằng i.
Ví dụ 1: Bài toán so sánh hai xâu: nhập vào 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 xâu nhập sau.
write(’Nhap ho ten thu nhat: ’);
write(’Nhap ho ten thu hai : );
if length(a)>length(b) then write(a) else write(b);
- Tham số của các hàm và thủ tục chuẩn phải hợp lí, chẳng hạn không thể dùng Insert(sl,s2,I0) khi length(s2)<10.
Khi chạy chương trình, nhập họ tên của hai người: Tran Doan Minh và Tran Doan Hien, thì kết quả của chương trình cho như hình 47 dưới đây:
Ví dụ 2: Bài toán kiểm tra hai xâu kí tự "Nhập hai xâu kí tự từ bàn phím và kiểm tra kí tự đầu tiên của xâu thứ nhất có trùng với kí tự của xâu thứ hai hay không?”
Chương trình.
program vidu2 ;
var
byte;
C, b: string;
begin
write ('Nhap xau thu nhat:');
readln (a) ;
write(’Nhap xau thu hai:');
readln(b);
X : = length (b);
{xac dinh do dai xau b de biet vi tri cua ki tu cuoi cung}
if a[1]=b[x] then write ('Trung nhau')
else write('Khác nhau');
readln
end.
Khi chạy chương trình, nhập các xâu vào: nếu kí tự đầu tiên của xâu thứ nhất ' thu do' không trùng với kí tự cuối cùng của xâu thứ hai ' ha noi ' thì chương trình đưa ra thông báo: “Khac nhau”, ngược lại chương trình đưa ra thông báo: “Trung nhau" kquả của chương trình cho như hình 48 dưới đây:
Ví dụ 3: Giải toán viết theo thứ tự ngược lại của xâu được nhập vào từ bàn phím.
Chương trình
procgram vidu3 ,
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.
Khi chạy chương trình, nhập vào xâu ' thu do ha noi' thì chương trình đưa ra kết quả “ion ah od uht", còn khi nhập vào xâu 'viet nam que huong toi' thì chương trình đưa ra kết quả: *iot gnouh euq man teiv* thì kết quả của chương trình cho như hình 49 dưới:
Ví dụ 4: Bài toán đưa ra màn hình xâu thu được bằng việc loại bỏ các dấu cách (nếu có) của xâu nhập vào từ bàn phím.
Chương trình:
program vidu4; \
var i, k:byte;
a, b: string;
begin
write('Nhap vao xau:');
readln (a) ,
k:= length(a)
b:= ' {*Khoi tao xau rong*} for i:= 1 to k do
if a[i]<> ' ' then b:= b + a[i];
writeln('Ket qua: b);
readln
End.
Khi chạy chương trình, nhập vào một xâu: 'Thủ đô Hà Nội' thì chương trình đưa ra kết quả: “ThudoHaNoi', còn khi nhập vào xâu ‘ Việt Nam quê hương tôi’ thì chương trình đưa ra thông báo: “ VietNamquehuongtoi".
Kết quả của chương trình cho như hình 50 dưới đây:
Ví dụ 5. Bài toán tạo xâu gồm tất cả các chữ số trong xâu nhập vào từ bàn phím (giữ nguyên thứ tự xuất hiện của chúng) và đưa kết quả ra màn hình Chương trình
program xulixau;
var si, s2: string;
i: by t e;
begin
write('Nhap xau si: ');
readln ( s1) ;
s2 : = ' ' ;{khoi tao xau s2 rong} for i: = 1 to length(s1) do
then s2:=s2+sl[i];
Khi chạy chương trình, nhập vào xâu vừa kí tự vừa chữ số, chẳng hạn xâu: 'chào mùa hè 2007" thì kết quả của chương trình là 2007, còn khi nhập vào xâu 'ngay 25 thang 5 nam 2007 ' , kết quả của chương trình là 2552007.
Kết quả của chương trình sau hai lần nhập xâu vào cho như hình 51 dưới đây:
Loigiaihay.com
Giải Bài Tập Tin Học 11 – Bài 12: Kiểu xâu giúp HS giải bài tập, giúp cho các em hình thành và phát triển năng lực sử dụng công nghệ thông tin và truyền thông:
Xem thêm các sách tham khảo liên quan:
- Sách Giáo Viên Tin Học Lớp 11
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.
1. Khai báo
Để khai báo dữ liệu kiểu xâu ta sử dụng tên dành riêng string, tiếp theo là dộ dài lớn nhất của xâu(không vượt quá 255 kí tự đặt trong dấu ngoặc [ và ] )
Cú pháp:
Var<tên biến>:string[độ dài lớn nhất của xâu]; Hoặc Var <tên biến>:string;Ví dụ:
Var ten:string[26]; Var chuthich:string;2. Các thao tác xử lí xâu:
a) Phép ghép xâu, kí hiệu là dấu (+), được sử dụng để ghép nhiều xâu thành một. Có thể thực hiện ghép xâu đối với hằng và biến xâu.
Ví dụ:
‘Tin hoc’+ ’11’ sẽ cho xâu có kết quả là ‘Tin hoc 11’.
b) Các phép so sánh như bằng (=), khác (<>), nhỏ hơn (<), … có độ ưu tiên thực hiện thấp hơn ghép xâu.Việc so sánh 2 xâu sẽ thực hiện theo nguyên tắc sau.
Xâu A lớn hơn xâu B nếu như kí tự đầ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 độ dài hai xâu khác nhau thì coi như thêm các kí tự đặc biệt (nhỏ hơn tất cả các kí tự trong bảng ASCII).
Ví dụ:
‘Ab’ sẽ nhỏ hơn ‘a’. Vì A có mã ASCII là 65 nhỏ hơn a là 97.
‘a’ sẽ nhỏ hơn ‘aB’ . Khi 2 xâu độ dài không bằng nhau ta thêm kí tự đặc biệt nhỏ hơn mọi kí tự trong bảng ASCII (dĩ nhiên sẽ nhỏ hơn B ).
c) Các thủ tục khác.
+ delete(st, vt, n) xóa n kí tự của xâu st từ vị trí vt.
+insert(st, s2, vt) chèn xâu s1 vào s2 bắt đầu ở vị trí vt.
+copy(S, vt, N); Tạo xâu gồm N kí tự liên tiếp bắt đầu từ vị trí vt của xâu S.
+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 in hoa ứng với chữ cái trong ch.
3. Một số ví dụ
Ví dụ 1
Chương trình 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 xâu nhập vào sau.
program vd1; uses crt; var a,b:string; begin clrscr; 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); readkey; end.Kết quả:
Ví dụ 2: Viết chương trình nhập hai xâu từ bàn phím và kiểm tra kí tự đầu tiên của xâu thứ nhất có trùng
Với kí tự cuối cùng của xâu thứ hai không.
program vd2; uses crt; var a,b:string; begin clrscr; write('nhap xau thu nhat:'); readln(a); write('nhap xau thu hai :'); readln(b); if a[1]=b[length(b)] then writeln('Trung nhau') else writeln('Khac nhau'); readkey; end.Kết quả:
Ví dụ 3:
Viết chương trình nhập xâu từ bàn phím rồi in nó theo thứ tự ngược lại.
program vd2; uses crt; var a:string; i:integer; begin clrscr; write('nhap xau:'); readln(a); write('xau dao nguoc la:'); for i:=length(a) downto 1 do write(a[i]); readkey; end.
Ví dụ 4:
Viết chương trình nhập vào từ bàn phím và đưa ra màn hình xâu thu được từ nó sau khi loại bỏ hết các dấu cách.
program vd2; uses crt; var a,b:string; i:integer; begin clrscr; write('nhap xau:'); readln(a); b:=''; for i:=1 to length(a) do if a[i]<>' ' then b:=b+a[i]; write('xau sau khi bo dau cach la',b); readkey; end.Kết quả:
Ví dụ 5:
Viết chương trình nhập vào từ bàn phím xâu kí tự s1, tạo xâu s2 gồm tất cả các chữ số có trong xâu s1 (giữ nguyên thứ tự xuất hiện của chúng ) và đưa kết quả ra màn hình.
program vd2; uses crt; var a,b:string; i:integer; begin clrscr; write('nhap xau:'); readln(a); b:=''; for i:=1 to length(a) do if ('0'<=a[i]) and ('9'>=a[i]) then b:=b+a[i]; write(b); readkey; end.