Gợi ý: While POSch,st0 Do Deletest,POSch,st,1; Bài tập 6.13: Viết chương trình nhập một xâu vào từ bàn phím và thông báo lên màn hình xâu đó có phải đối xứng không theo 2 cách: Đệ qui và[r]
(1)Bài tập 6.11: Viết chương trình nhập vào xâu ký tự từ bàn phím Tìm và in màn hình từ có độ dài lớn xâu Gợi ý: Tách từ để so sánh (xem bài tập 5) Bài tập 6.12: Viết chương trình nhập xâu ký tự St từ bàn phím và ký tự ch In màn hình xâu St sau xóa hết các ký tự ch xâu đó Gợi ý: While POS(ch,st)<>0 Do Delete(st,POS(ch,st),1); Bài tập 6.13: Viết chương trình nhập xâu vào từ bàn phím và thông báo lên màn hình xâu đó có phải đối xứng không theo cách: Đệ qui và không đệ qui (Ví dụ: abba, abcba là các xâu đối xứng) Gợi ý: - Nếu xâu Length(st)<=1 thì st là xâu đối xứng - Ngược lại: + Nếu st[1]<>st[Length(st)] thì st không đối xứng + Ngược lại: Gọi đệ qui với xâu st sau bỏ ký tự đầu và ký tự cuối Bài tập 6.14: Viết chương trình đảo ngược thứ tự các từ xâu nhập vào từ bàn phím Ví dụ: Xâu Nguyen Van An thành An Van Nguyen Gợi ý: Tách từ nối vào đầu xâu (xem bài tập 5) Bài tập 6.15: Viết chương trình nhập vào xâu ký tự s1 và s2 Kiểm tra xem xâu s2 xuất bao nhiêu lần xâu s1 (Lưu ý: length(s2)<= length(s1)) Gợi ý: Dùng hàm POS để kiểm tra và thủ tục DELETE để xóa bớt sau lần kiểm tra Bài tập 6.16: Viết chương trình nhập vào dòng văn bản, hiệu chỉnh văn theo yêu cầu sau đây và in văn sau hiệu chỉnh màn hình: a Xóa tất các ký tự trắng thừa b Trước các dấu câu không có các ký tự trắng, sau các dấu câu có ký tự trắng c Đầu câu in hoa http://www.mediafire.com/?luek9d2ucc4gvd9 (2)