Viết đoạn chương trình thay thế tất cả các cụm kí tự 'doan hung' thành 'ha hoa' của xâu S và cho biết có bao nhiêu lần thay thế

viết đoạn chương trình thay thế tất cả các cụm kí tự 'doan hung' thành 'ha hoa' của xâu S và cho biết có bao nhiêu lần thay thế(giúp mình với mình đang cần gấp làm bằng trình duyệt pascal giúp mình với ạ mình cảm ơn)