Question

Viết chương trình nhập vào 1 xâu bất kỳ từ bàn phím, thay thế tất cả các cụm kí tự

“choi” bằng cụm kí tự “hoc”.

Answer 1

xau = input("Nhập vào một xâu bất kì: ")

xau_moi = xau.replace("choi", "hoc")

print("Xâu mới sau khi thay thế là:", xau_moi)

Answer 2

Program HOC24;

var s: string;

d: byte;

begin

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

while pos('choi',s)<>0 do

begin

d:=pos('choi',s);

delete(s,d,4);

insert('hoc',s,d);

end;

write('Xau sau khi thay la: ',s);

readln

end.