, .
. , , N ( ). : , - .., - . :
1) ;
2) ;
3) . :
1) N-1 ;
5) ;
6) N-1 .
-, , :
130
(defun - ()
(rgn ( " " " ) "))
-
(defun ( n)
(cond
((= 1); 2
( ) (t ( ; 1
(- n 1))
( )
( ; 3
(- 1)))))
(defun ( )
(format t "~S -> ~S~%" ))
:
(- 3)
->
->
->C
->
->
->
->
, , .
, , . :
(_1 1 _2 2... _N N).
PUTPROP ( PUT):
(PUTPROP ).
, , GET:
(GET ).
:
(SETF (GET ) ).
, , - .
1. ?
2. ?
3. ?
|
|
4. ?
5. .
6. ? ?
7. 1- .
8. ?
9. .
10. ?
11. , , ( ).
-
(. 4.1), , . , - .
- . , . ( ), (), . , . , , ( ), - . , , .
, :
;
, , ;
;
;
;
.
. , , - . , 5.5, - - .