Logo
Книга для начинающих
ВходРегистрация
/
-
/
Курс Prolog
/

Backtracking

Prolog: Backtracking

Задание

Полезное

Нашли ошибку? Есть что добавить? Пулреквесты приветствуются
Если вы столкнулись с трудностями и не знаете, что делать, задайте вопрос в нашем большом и дружном телеграм-сообществе
  1. Привет, Мир!
  2. Комментарии
  3. Конъюнкция и дизъюнкция
  4. Backtracking
  5. Факты
  6. Вопросы к факт
/
-
/
Курс Prolog
/

Backtracking

Prolog: Backtracking

Задание

Полезное

Нашли ошибку? Есть что добавить? Пулреквесты приветствуются
← ПредыдущийСледующий →
Loading...
← ПредыдущийСледующий →
← ПредыдущийСледующий →

Ваше упражнение проверяется по этим тестам

:- style_check(-singleton).
:- dynamic error_happened/1.

:- assertz(error_happened('OK')).

user:message_hook(Term, error, _Lines) :-
	retract(error_happened('OK')),
    assertz(error_happened(error)),
    fail.
:- include(main).
:- forall(call(writer), (nl, write('true ;'), nl)).

:- begin_tests(backtracking).

test(040, Output == 'a\ntrue ;\nbc\ntrue ;\n') :-
    with_output_to(atom(Output), forall(call(writer), (nl, write('true ;'), nl))),
    error_happened(X).

:- end_tests(backtracking).
← ПредыдущийСледующий →

Решение учителя откроется через:

20:00

waiting_clock
← ПредыдущийСледующий →