Введение в программирование на Лиспе



             

Пример 7.1


(defun next (xl) ; Следующие числа: (cond ; пока список не пуст (xl (cons (1+ (car xl)) ; прибавляем 1 к его голове (next (cdr xl)) ; и переходим к остальным, ) ) ) ) ; собирая результаты в список

(next '(1 2 5 )) ; = (2 3 6 )

Пример 7.1. Для каждого числа из заданного списка получить следующее за ним число и все результаты собрать в список.

Закрыть окно






Содержание  Назад  Вперед