Viết chương trình nhập vào một xâu s từ bàn phím và đưa xâu sau khi đã xóa k kí tự bắt đầu từ vị trí n

Question

dongocdiem · Answer

program xoa_kitu;

uses crt;

var s:string;

n,k:byte;

begin

clrscr;

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

write(‘Nhap vi tri n: ‘); readln(n);

write(‘Nhap so ki tu xoa k: ‘); readln(k);

delete(s,n,k);

write(‘Xau sau khi xoa la: ‘,s);

readln;

end.

0 bình luận về “Viết chương trình nhập vào một xâu s từ bàn phím và đưa xâu sau khi đã xóa k kí tự bắt đầu từ vị trí n”