Viết chương trình nhập vào 2 xâu s1 và s2 từ bàn phím với ít nhất mỗi xâu gồ ít nhất 6 phần tử và thực hiện các lệnh sau
Xóa trong xâu s2 bắt đầu từ phần tử 5và xóa đi 4 phần tử
Viết chương trình nhập vào 2 xâu s1 và s2 từ bàn phím với ít nhất mỗi xâu gồ ít nhất 6 phần tử và thực hiện các lệnh sau
Xóa trong xâu s2 bắt đầu từ phần tử 5và xóa đi 4 phần tử
var s,s2:string;
i:integer;
begin
write(‘nhap s: ‘); readln(s);
write(‘nhap s2: ‘); readln(s2);
delete(s2,5,4);
write(s2);
readln;
end.