Вариант 4 (2)
Обобщеното решение sol(N,S) за дъска NxN ще има вида:
sol(N,S):-generate(1,N,Dxy),
Nu1 is 1-N, Nu2 is N-1,
generate(Nu1,Nu2,Du),
Nv2 is N+N,
generate(2,Nv2,Dv),
solve(S,Dxy,Dxy,Du,Dv).%от Вариант 3
generate(N,N,[N]).
generate(N1,N2,[N1|List]):-
N1 < N2, M is N1+1, generate(M,N2,List).
Previous slide
Next slide
Back to first slide
View graphic version