> 1 <

Автор Сообщение

Tanchik

Members


Статус

10 сообщений

Где: Ukraine
Род занятий:
Возраст:

#5951   2012-04-09 21:03 GMT+3 часа(ов)      
ЛР
Превратить графическую нотацию в S - выражения

отредактировал(а) Tanchik: 2012-04-18 18:34 GMT+3 часа(ов)

Tanchik

Members


Статус

10 сообщений

Где: Ukraine
Род занятий:
Возраст:

#5969   2012-04-13 15:18 GMT+3 часа(ов)      
Думаю разобралась в структурах, не знаю на сколько верно может кому пригодится
ЛР 2

(setq y’ (nil 1 2 3))
(setq z’ (a b c))
(setq k’ (b c nil 3))
(rplaca (cddr k) (cddr y))
(rplacd (cddr z) (cdddr y))
(rplaca y z)
(setq x1 (cons nil (cons ’ h y)))
(setq f1 (cons ’ f y))
(rplaca x1 f1)
(setq p (cons nil y))
(rplaca p k)
(setq s (cons nil (cdddr y)))
(rplaca s p)
(setq x (cons nil x1))
(rplaca x s)

Значение х
((((b c (2 3) 3) a b c 3) 3 (f (a b c 3) 1 2 3) h (a b c 3) 1 2 3)
> 1 <


Онлайн :

0 пользователь(ей), 34 гость(ей) :




Реклама на сайте: