Bài 12: Kiểu xâu

Nguyên văn A

Viết chương trình nhập vào từ bàn phím một xâu ký tự, chương trình tự tìm những ký tự là số để xóa đi và xuất kết quả ra màn hình.

Minh Lệ
1 tháng 9 2021 lúc 21:57

Program HOC24;

var s: string;

i: byte;

begin

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

for i:=1 to n do if not(s[i] in ['0'..'9']) then write(s[i]);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Khánh Mỹ
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Harunastu
Xem chi tiết
phuoc
Xem chi tiết
Nguyễn Taetruc
Xem chi tiết
Khánh Mỹ
Xem chi tiết
LINH VU HA NGOC
Xem chi tiết