Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trần Văn Anh Dũng

viết chương trình nhập vào một xâu bất kì sau đó tiến hành xóa tất cả các kí tự a hoặc A

giúp mình với ạ 

Nguyễn Lê Phước Thịnh
28 tháng 2 2022 lúc 7:48

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

readln(st);

d:=length(st);

for i:=1 to d do 

  if (st[i]<>'a') and (st[i]<>'A') then write(st[i]);

readln;

end.


Các câu hỏi tương tự
Duy Nguyễn
Xem chi tiết
Hiếu
Xem chi tiết
Phấn Nguyen
Xem chi tiết
Nguyễn TRƯỜNG Giang
Xem chi tiết
Coming Home
Xem chi tiết
Thiên Thiên
Xem chi tiết
Hakai
Xem chi tiết
Tiên Tiên
Xem chi tiết
vu quang hiep
Xem chi tiết