Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Thúy Hà
Viết chương trình nhập từ bàn phím xâu a, sau đó tạo xâu b gồm những kí tự có trong xâu a nhưng bỏ đi 2 kí tự a và A.
Nguyễn Lê Phước Thịnh
7 tháng 3 2021 lúc 18:36

uses crt;

var a,b:string;

d,i:integer;

begin

clrscr;

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

d:=length(a);

b:=''

for i:=1 to d do 

  if (a[i]<>'a') and (a[i]<>'A') then b:=b+a[i];

writeln(b);

readln;

end.


Các câu hỏi tương tự
Long Nhi
Xem chi tiết
Tiên Tiên
Xem chi tiết
Nguyễn thị tuyết nhung
Xem chi tiết
hoangphuc nguyen
Xem chi tiết
no no
Xem chi tiết
no no
Xem chi tiết
Thiên Thiên
Xem chi tiết
Nguyễn Vy
Xem chi tiết
Triệu Ngọc Phượng
Xem chi tiết