вводится текст из слов, между которыми пробел, и отдельное слово. Слова

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку слов:');
  var w:=ReadlnString('Введите слово для замены:');
  var (fc,lc):=(w.First,w.Last);
  s:=s.ToWords.Select(v-gt;(Pos(fc,v)gt;0) or (Pos(lc,v)gt;0)?w:v)
      .JoinIntoString;
  Writeln(s)
end.

Пример
Введите строчку слов: Наша Таня звучно вопит уронила в речку мячик
Введите слово для замены: удалено
Наша Таня удалено вопит удалено в удалено мячик