// PascalABC.NET 3.2, сборка 1353 от 27.11.2016// Внимание! Если программа не работает, обновите версию!begin ReadlnString('->').ToWords.Where(w->w.Right(2)='ая').Printlnend.Результат-> Я самая обаятельная и привлекательная в этом классесамая обаятельная привлекательная