, .. , .
: , .
, . 2.3, . , , ... ( ),
1, 2, 3...
(S, , ), ,
S. , (S, , ) (S, , ). ,
. 2.3, .
, 8 , :
(,): - (,8), write_list(),!. (1)
(,): - (,,),_(,),(,[|]). (2)
, . 1 , 8, . , 2. 2 , () , , , .
, ,
([],0).
([ | ], N):- (, ), N is M+1.
write_list([ ]).
write_list([H | T]):-write(H),write_list().
?-(4,[ ]).
- , 4 .
: , , , , , , , .
?-(1,[ ]) Ҕ.
, , - , .
:
1) ( );
2) , ;
3) , ;
4) .
, , , . . :
|
|
1) , , , ( ) ();
2) ;
3) () .
, , .
: 3 5 . 4 ?
V W . V=0, W=0, V=0, W=4. :
(VI, W1):- (V2, W2).
, :
(0, W):- (V, W).
, . . , , , , . , , .
:
(3, W):- (V, W).
, .
, , , . :
(3,W):-(V,WV+3).
(V,0):- (VW,W).
(V,5):- (VW+5,W).
(0,W):- (V, WV).
. () 3- . :
(V1,W1, [V1,W1 | ]):- _(V1,W1,), (V2, W2, ).
, , :
(_,4,):- write_list(),!.