... cầu học sinh viết chưưong trình nhập vào hai xâu in xâu có độ dài ngắn không in xâu HS: Thực máy nhập sau GV: Theo dõi, hướng dẫn gọi học sinh thực máy Nhận xét, đánh giá, rút kinh chiếu để học ... Readln(s); Nhập xâu S While pos(‘anh’,s)0 Chừng tìm thấy xâu Begin ‘anh’ làm: Vt:=pos(;anh’,s); -Tìm vị trí bắt đầu xâu ‘anh’ DELETE(s,vt,3); INSERT(‘em’,s,vt); -Xoá xâu ‘anh’ End; -Chèn xâu ‘em’ ... End; -Chèn xâu ‘em’ Write(s); In kết Readln; END Củng cố: Nhắc lại thao tác Xâu 5.Dặn dò, bổ sung: Xem kĩ tập thực hành ...