Помогите решить задачу по прологу

Помогите, пожалуйста, с решением задачи. Мучаюсь уже долго, никак не получается. Нужно решить задачу с помощью пролога.