Дан вектор, элементы которого списки из целых чисел.Заменить на NILL списки с суммой равной 0

@Mashka_mulashka · Регистрация: 13.12.2011

Студворк — интернет-сервис помощи студентам

Дан вектор, элементы которого списки из целых чисел.Заменить на NILL списки с суммой равной 0.

@Catstail · 10.12.2013, 18:09

Ты уверена, что на NILL? Может, на Nil

Lisp

(defun task-4 (vect)
  (mapcar #'(lambda (x) (if (zerop (apply '+ x)) nil x)) vect))
 
==> task-4
 
(task-4 '((1 2 3) (4 5 6) (1 2 -3) (0 0 0) (1 1 1)))
 
==> ((1 2 3) (4 5 6) NIL NIL (1 1 1))

@Mashka_mulashka · 11.12.2013, 10:42 **[ТС]**

скорей всего на Nil, да. ибо NILL зарезервировано...

@Catstail · 11.12.2013, 10:53

Сообщение от Mashka_mulashka

NILL зарезервировано...

- зарезервировано как раз Nil (с одним l)

@Mashka_mulashka 25 / 25 / 11 Регистрация: 13.12.2011 Сообщений: 818
		1
	Дан вектор, элементы которого списки из целых чисел.Заменить на NILL списки с суммой равной 0 10.12.2013, 17:16. Показов 1266. Ответов 3 Метки нет (Все метки) Дан вектор, элементы которого списки из целых чисел.Заменить на NILL списки с суммой равной 0. 0

@Mashka_mulashka 25 / 25 / 11 Регистрация: 13.12.2011 Сообщений: 818
	11.12.2013, 10:42 [ТС]	3
	скорей всего на Nil, да. ибо NILL зарезервировано... 0

@Catstail Модератор 35589 / 19487 / 4074 Регистрация: 12.02.2012 Сообщений: 32,526 Записей в блоге: 13
	11.12.2013, 10:53	4
	Сообщение от Mashka_mulashka NILL зарезервировано... - зарезервировано как раз Nil (с одним l) 0

Опции темы