Trong ngôn ngữ lập trình pascal, đoạn chương trình sau thực hiện công việc gì? (S là xâu ký tự bất kỳ). Hãy cho biết câu lệnh : xóa chữ “em” trong xâu s? S1:=’anh’; s2:=’em’; i:=pos(s2,s); While i<>0 do Begin Delete(s,i,2); Insert(s1,s,i); i:=pos(s2,s); End;