SGK Tin Học 11 - Bài tập và thực hành 5

Bài tập và thực hành
Mục đích, yêu cầu
Làm quen với việc tìm kiếm, thay thế và biến đổi xâu.
Nội dung
Bài 1. Nhập vào từ bàn phím một xâu. Kiểm tra xâu đó cổ phải là xâu đối xứng hay không. Xâu đối xứng có tính chất: đọc nó từ phải sang trái cũng thu được kết quả giống như đọc từ trái sang phải (còn được gọi là xâu palindrome).
Hãy chạy thử chương trình sau: var i,x: byte;
a,p: string; begin
write('Nhap vao xau: '); readln (a);
X:=length(a);	{xac dinh do dai cua xau }
p:='';	{khoi tao xau rong }
for i:=x downto 1 do
p:=p+a[i]; {tao xàu dao nguoc }
if a=p then
write('Xau la palindrome')
else
write(\Xau khong la palindrome'); readln
end.
Hãy viết lại chương trình trên, trong đó không dùng biến xâu p.
Bài 2. Viết chương trình nhập từ bàn phím một xâu kí tự s và thông báo ra màn hình số lần xuất hiện của mỗi chữ cái tiếng Anh trong s (không phân biệt chữ hoa hay chữ thường).
Bài 3. Nhập vào từ bàn phím một xâu. Thay thế tất cả các cụm kí tự 'anh' bằng cụm kí tự 'em'.