Разберитесь как работает ещё одна функция замены(желательно в PascalABC)

пример неправильных данных - ReplaceBad('abc','b','bb')

так функция не выйдет и цикла

в строке abc буква 'b' будет заменяться на 'bb'

abc->abbc->abbbc->>abbbc ну и пока памяти хватит

Объяснение: