Ноя, 2009 Сообщений: 3 | sasha198407 url://forum.message:3173 Задача на Prologe Доброго времени суток. Месяц этак назад попросил на одном из форумов, что бы помогли решить задачу на Prolog(e). Описание ниже Дополните программу «Списки» ещё одной операцией над списками: проверка списка на упорядоченность Ну спасибо людям помогли(решение ниже)
<?php ifSorted(A,[B,B|C],D):- !, ifSorted(A,[B|C],D). ifSorted(A,[B,C|D],E):- B<C, !, not(A='down'), ifSorted('up',[C|D],E). ifSorted(A,[B,C|D],E):- !, not(A='up'), ifSorted('down',[C|D],E). ifSorted(A,_,A). ?>
Только вот ни кто не объяснил что здесь к чему. Если кто может объясните пожалуйста. Зарание спасибо. |