program HOC24;
var s:tring;
i: byte;
begin
write('Nhap xau S: '); readln(s);
for i:=1 to length(s) do if s[i] in ['a'..'z'] then write(s[i]);
readln
end.
Viết phương trình:
a, Nhập vào từ bàn phím 2 xâu a, b chứa các chữ thường và thông báo ra màn hình tổng độ dài của 2 xâu
b, Tạo xâu c gồm các chữ cái từ xâu a và các chữ số từ xâu b. Đưa xâu c lên màn hình.
Nhập vào 1 xâu bất kì , in ra màn hình 2 sâu Xâu 1 các chữ số Xâu 2 các chữ cái
Nhập 1 xâu S từ bàn phìm( chữ HOA). In ra màn hình xâu S chữ thường
viết chương trình nhập 1 xâu bất kì từ bàn phím ,đưa ra màn hình xâu sau khi xoá n kí tự từ vị trí bất kì
Viết chương trình nhập vào 1 xâu, tạo xâu từ xâu vừa nhập bao gồm các kí tự khác chữ, hiển thị kết quả ra màn hình
viết chương tình nhập 1 xâu S từ bàn phím. Tạo xâu S1 gồm 4 phần tử cuối cùng của xâu S, xuất xâu S,S1 ra màn hình.
Viết chương trình nhập xấu S. Đưa ra số kí tự chữ cái trong xâu (bao gồm cả chữ hoa và chữ thường)
viết chương trình nhập vào từ bàn phím một xâu bất kì hãy thực hiện xoá 5 kí tự bắt đầu từ vị trí 3 cả xâu đó rồi đưa kết quả ra màn hình
Viết chường trình nhập 1 xâu vào từ bàn phím và đưa ra màn hình số chữ số xuất hiện trong xâu đó
