Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Cảnh Lê

nhập vào sâu S và thực hiện các yêu cầu sau:

yêu cầu hãy xóa hết các ký tự trắng có trong xâu. In xâu S ra màn hình

Minh Lệ
3 tháng 5 2019 lúc 12:16

Lời giải :

program hotrotinhoc ;

var s: string;

begin

write('Nhap xau s :'); readln(s);

while s[1]=#32 do

delete(s,1,1);

while pos(#32#32,s) <>0 do

delete(s,pos(#32#32,s),1);

while s[length(s)]=#32 do

delete (s,length(s),1);

write(s);

readln

end.


Các câu hỏi tương tự
A8_ Võ Thị Thương
Xem chi tiết
tonhu
Xem chi tiết
Huyền Nguyễn
Xem chi tiết
Linh Daxua
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Trường Giang Vũ
Xem chi tiết
Nguyễn Hữu Thành Vinh
Xem chi tiết
Thangg PH
Xem chi tiết
Thọ Phạm
Xem chi tiết