Вариант 2 (7)
Тогава програмата, която дава решението ще има вида:
solution(S):-perm([1,2,3,4,5,6,7,8],S),
safe(S).
safe([]).
safe([Q|Rest]):-
safe(Rest),
notbeat(Q,Rest,1).
Previous slide
Next slide
Back to first slide
View graphic version