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

book

genreHorror/genre

/book

for $i in doc("books.xml")/catalog/book

let $cnt := count(doc("books.xml")/catalog/book[genre = $i/genre])

let $gen := $i/genre

where $cnt = 1

group by $gen

order by $gen descending

ret...