Программка с акцентом )))
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnString.ToWords;
a.Transform(t->RightStr(t,2)='ая' ? t[:t.Length-1]+'ой':t);
a.Println
end.
Пример
Ох, какая же большая пребольшая эта синяя птичка!
Ох, какой же большой пребольшой эта синяя птичка!