Используя отсечение, неуспех и отрицание, написать программу:

1.Написать программу-классификатор, которая бы спортсменов некоторого клуба делила бы на группы:
а) победители – те, кто ни разу не проиграл ни одного боя;
б) бойцы – те, кто и выигрывал, но и был побежденным;
в) спортсмены – те, кто пока не выиграл ни одного боя,

если дан предикат победил(кто, кого). В качестве решения должен быть определен предикат класс(кто, группа)

2. Написать программу вычисления с альтернативами:
— Найти наибольшее (наименьшее) значение из двух чисел.
— Найти наибольшее (наименьшее) значение из трех чисел.
— Найти наибольшее (наименьшее) значение из шести чисел.
— Определить, удовлетворяют ли длины трех отрезков условию прямоугольного треугольника.
— Определить, удовлетворяют ли длины трех отрезков условию треугольника.
— Два треугольника заданы длинами сторон. Определить наибольшую сторону из наименьших в этих треугольниках.
— Найти модуль числа X.
— Описать на языке Пролог вычисление функции, заданной соотношением:

3. Написать программу вычисления максимального из трех чисел, используя результат задания 2.

4*. Игроки в некотором теннисном клубе разбиты на три лиги, и могут вызывать на соревнования только членов своей лиги или же стоящих на одну лигу ниже (если таковая имеется). Написать программу, которая будет печатать все возможные пары между игроками в следующей форме: nik вызывает liz.
Использовать отсечение, чтобы не печатались одновременно пары игроков nik вызывает liz и liz вызывает nik.
5.
Даны результаты сдачи экзаменов для группы из пяти учеников:
Построить базу знаний о результатах экзаменов, определив в ней следующие правила:
отличник (человек, у которого по всем предметам пятерки);
двоечник (есть хотя бы одна двойка);
математик (по алгебре и по геометрии учится на 4 и 5). Получить ответы на следующие вопросы:
Является ли Вяткин отличником?
Определить всех отличников.
Определить всех двоечников.
Является ли Соснин математиком?
Определить всех неуспевающих по истории.
Определить всех двоечников.

фамилия алгебра геометрия история
Антонов 5 5 5
Бобров 5 3 2
Вяткин 5 5 5
Кротов 2 3 3
Соснин 4 4 4