Tin học Xâu S

Uppp said:

Hình bài dạy ạ!! Có ai giúp mình làm với ạ!! Trân thành cảm ơn rất nhiều

Bấm để xem đầy đủ nội dung ...

Uppp said:

Cảm ơn đã làm giúp mình!!!
Không biết còn cách làm nào khác không vậy bạn ?

Bấm để xem đầy đủ nội dung ...

while pos(k,s) <> 0 do delete(s,pos(k,s),1);

iceghost said:

Thay vì dùng for thì có thể dùng while:

Mã:

while pos('k',s) <> 0 do delete(s,pos('k',s),1);

Bấm để xem đầy đủ nội dung ...

Trâm Nguyễn Thị Ngọc said:

Em nghĩ là pos(k,s)<>0 chứ anh nhỉ, vì nếu anh làm như thế thì nó sẽ xóa tất cả các kí tự k chứ không phải là xóa các kí tự k nhập vào từ bp

Bấm để xem đầy đủ nội dung ...

Uppp said:

Cho mình hỏi thêm có cần viết uses crt ở đầu và thêm clrscr dưới begin không vậy ạ???

Bấm để xem đầy đủ nội dung ...