> 1 <

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

vladimirr_b

Members


Статус

1 сообщений

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

#7666   2015-11-15 15:47 GMT+3 часа(ов)      
Здравствуйте! в списке (1 2 3) нужно заменить 3 на 10, т.е. результат должен быть (1 2 10). Какой функцией это можно сделать?

gomer

Members


Статус

24 сообщений

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

#7668   2015-11-25 16:15 GMT+3 часа(ов)      
можно так
(subst 10 3 '(1 2 3))

а можно и по порядковому номеру
(defun substitute (lst i n)

  (if (zerop i)

	(cons n (cdr lst)) 

	(cons (car lst) (substitute (cdr lst) (1- i) n))

  )

)
> 1 <


Онлайн :

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