Логическая задача (рост и возраст) - Prolog

Формулировка задачи:

Выполните задание в среде Prolog Имеется информация о том, что спортсмены Игорь, Роман, Антон, Виктор, Николай имеют соответственно возраст и рост: 18 и 189, 17 и 182, 20 и 191, 21 и 185, 16 и 193. Необходимо: а) выбрать всех спортсменов выше 184 (включительно), но не выше 190; б) выбрать спортсменов моложе 20 лет, но не моложе 18 (включительно); в) выбрать всех спортсменов с ростом не ниже 186 и не старше 19 лет (включительно). помогите пожалуйста

Решение задачи: «Логическая задача (рост и возраст)»

textual
                            Листинг программы 
                        
                            ?- findall( Name, (sm(Name, Age, Height), Height > 186, Age =< 19), Xs ).
Xs = ['Игорь', 'Николай'].