20981

Конструирующая рекурсия

Лабораторная работа

Информатика, кибернетика и программирование

DEFUN F11_2 X L COND NULL L T = 0 REM X CAR L NIL T F11_2 X CDR L DEFUN F11_1 X Y S IF = 2 Y SETQ S NIL SETQ S F11_1 N Y 1 COND AND = 0 REM X Y F11_2 Y S CONS Y S T REVERSE S DEFUN F11 N COND OR NOT INTEGERP N NOT PLUSP N Error_Not_Integer = N 1 NIL T F11_1 N N Реверсировать элементы списка произвольной структуры на всех уровнях. DEFUN F12_1 L COND NULL L ' ATOM CAR L APPEND F12_1 CDR L LIST CAR L LISTP CAR L APPEND...

Русский

2013-08-02

20.47 KB

1 чел.

Лабораторная работа № 3.

Конструирующая рекурсия.

  1.  Сформировать список простых множителей заданного числа.

(DEFUN F11_2 (X L)

(COND ((NULL L) T)

((= 0 (REM X (CAR L))) NIL)

(T (F11_2 X (CDR L)))

)

)

(DEFUN F11_1 (X Y S)

(IF (= 2 Y)

(SETQ S NIL)

(SETQ S (F11_1 N (- Y 1)))

)

(COND ((AND (= 0 (REM X Y)) (F11_2 Y S)) (CONS Y S))

(T (REVERSE S))

)

)

(DEFUN F11 (N)

(COND ((OR (NOT (INTEGERP N)) (NOT (PLUSP N))) Error!_Not_Integer)

((= N 1) NIL)

(T (F11_1 N N))

)

)

  1.  Реверсировать элементы списка произвольной структуры на всех уровнях.

(DEFUN F12_1 (L)

(COND ((NULL L) '())

((ATOM (CAR L)) (APPEND (F12_1 (CDR L)) (LIST (CAR L))))

((LISTP (CAR L)) (APPEND (F12_1 (CDR L)) (LIST (F12_1 (CAR L)))))

)

)

(DEFUN F12 (L)

(COND ((NOT (LISTP L)) Error!_Not_list!)

((NULL L) List_is_Empty!)

(T (F12_1 L))

)

)

  1.  Линеаризовать список произвольной структуры.

(DEFUN F13_1 (L)

(COND ((NULL L) NIL)

((LISTP (CAR L)) (APPEND (F13_1 (CAR L)) (F13_1 (CDR L))))

(T (CONS (CAR L) (F13_1 (CDR L))))

)

)

(DEFUN F13 (L)

(COND ((NOT (LISTP L)) Error!_Not_list!)

((NULL L) List_is_Empty!)

(T (F13_1 L))

)

)

  1.  Сформировать список, являющийся пересечением двух заданных линейных списков.  Повторяющиеся в исходных списках элементы должны входить в результирующий список не более одного раза.

(DEFUN F14_1 (L1 L2 P)

(COND ((NULL L2) P)

((AND (MEMBER (CAR L2) L1) (NOT (MEMBER (CAR L2) P)))

(SETQ P (CONS (CAR L2) P))

(SETQ P (F14_1 L1 (CDR L2) P)))

(T (SETQ P (F14_1 L1 (CDR L2) P)))

)

)

(DEFUN F14 (L1 L2)

(COND ((OR (NOT (LISTP L1)) (NOT (LISTP L2))) Error!_Not_list!)

((NULL L1) NIL)

((NULL L2) NIL)

(T (F14_1 L1 L2))

)

)

  1.  Сформировать список чисел ряда Фибоначчи (см. задание N 5) от первого числа до числа с заданным номером включительно.

(DEFUN F15_1 (M N P H)

(SETQ H (+ (CAR P) (CDR P)))

(IF (< M N)

(CONS H (F15_1 (+ M 1) N (CONS H (CAR P))))

(LIST H)

)

)

(DEFUN F15 (N)

(COND ((NOT (NUMBERP N)) Error!_Not_number!)

((<= N 0) Error!_Wrong_number!)

((EQ N 1) '(1))

((EQ N 2) '(1 2))

(T (CONS 1 (CONS 2 (F15_1 3 N))))

)

)


 

А также другие работы, которые могут Вас заинтересовать

45293. Объективная оценка показателей качества передачи речи: рейтинговая модель E при планировании; интегральные оценки по отношению сигнал/шум и на основе обобщенного коэффициента 490.5 KB
  Объективная оценка показателей качества передачи речи: рейтинговая модель E при планировании; интегральные оценки по отношению сигнал шум и на основе обобщенного коэффициента. Субъективная оценка показателей качества передачи речи: статистические слушательская и абонентская. Оценка качества передачи речи При оценке качества передачи речевой информации применяются субъективные квазисубъективные либо объективные методы. В последнее время чаще используются объективные методы оценки позволяющие автоматизировать данный процесс сделать его...
45294. Оценка показателей качества передачи данных в сетях с коммутацией пакетов. Уровни приоритетов, уровни надежности, классы скорости. Качество передачи данных в классах сетей 3G 126 KB
  Оценка показателей качества передачи данных в сетях с коммутацией пакетов. Качество передачи данных в классах сетей 3G. Оценка качества передачи данных в сетях с коммутацией пакетов Развитие технологий 2G 3G идет в направлении перехода от технологий передачи данных с коммутацией каналов к технологиям передачи данных с коммутацией пакетов Pcket Switched Dt ServicePSD Generl Pcket Rdio Service GPRS. Рассмотрим методы измерений показателей и расчета параметров качества предоставления услуг передачи данных в сетях подвижной связи с...
45295. Принципы управления качеством обслуживания. Схема взаимодействия при обеспечении качества 104.47 KB
  Обязательства операторов перед потребителями услуг связи по базовым услугам. Принципы управления качеством обслуживания Система управления качеством обслуживания представляет систему мер которые обеспечивают соответствие качества услуг связи установленным требованиям. Стандарты систем управления качеством базируются на принципах индивидуальной ответственности поставщика услуг фиксировании данных о качестве услуг и разработки эффективных административных процедур. Базовый уровень требований к системе управления качеством услуг обозначен в...
45296. Управление качеством обслуживания в рамках концепции QoS. Требования к параметрам качества услуг: задержке, потере данных 435.78 KB
  Требования к параметрам качества услуг: задержке потере данных. Соглашения о предоставлении услуг SL. К решению проблем управления качеством услуг разработчики стандартов GSM подошли только на этапе создания GPRS так как использование пакетной коммутации предъявило высокие требования к основным параметрам сети. Причиной этому является то что трафик услуг передачи данных обрабатываемый с использованием технологии GPRS в сети GSM всегда имеет вторичный приоритет по сравнению с речевыми услугами т.
45297. Общие принципы построения систем радиосвязи и их место в сетях связи РФ. Архитектура сетей. Системы фиксированной и подвижной радиосвязи. Виды систем радиосвязи. Характеристики 1-5 поколений 299.5 KB
  Системы фиксированной и подвижной радиосвязи. Системы фиксированной радиосвязи Системы связи работающие в диапазонах низких средних и высоких частот Современные технические средства ВЧ радиосвязи и их модульная архитектура позволяют создавать системы сухопутной и морской связи самого различного назначения. С помощью этих систем можно организовать: линии двухсторонней радиотелефонной связи по принципу каждый с каж дым с возможностью выхода в общегосударственную либо учрежденческую телефонную сеть; системы дипломатической связи передачу...
45298. Классификация опорных сетей радиодоступа. Характеристики систем радиодоступа. Регламент радиосвязи РФ: содержание, виды радиосвязи, службы, выделение полос. Федеральные, региональные и международные стандарты системы радиосвязи 914 KB
  Классификация опорных сетей радиодоступа. Характеристики систем радиодоступа. Под сетью радиодоступа понимают радиальнозоновую сеть радиосвязи предназначенную для предоставления услуг связи с качеством не уступающим качеству проводных систем связи. В состав сети радиодоступа входят базовые станции коммутационное оборудование К вспомогательные технические средств и программное обеспечение с помощью которых формируется территориальная зона на которой возможны подключения через радиоинтерфейс абонентских станций: В систему...
45299. Классификация радиорелейных линий связи. РРЛ прямой видимости: принципы построения, методы разделения каналов 75.5 KB
  РРЛ прямой видимости: принципы построения методы разделения каналов. Тропосферные РРЛ. Радиорелейные линии РРЛ представляют собой цепочку приемопередающих радиостанций оконечных промежуточных узловых которые осуществляют последовательную многократную ретрансляцию прием преобразование усиление и пе редачу передаваемых сигналов. Классификация радиорелейных линий В зависимости от используемого вида распространения радиоволн РРЛ можно разделить на две группы: прямой видимости и тропосферные.
45300. Спутниковые системы связи. Принцип действия, классификация. Примеры спутниковых систем связи 47.5 KB
  Спутниковые системы связи. Примеры спутниковых систем связи. СС отличаются орбитами спутников: формой круговая эллиптическая высота над Землёй наклон к экватору экваториальные полярные наклонные. На ней несколько сотен спутников что потребовало международного регулирования.
45301. Классификация и особенности транкинговых систем связи. Системы подвижной радиосвязи: принципы построения и функционирования, диапазоны частот, методы аналоговой и цифровой модуляции, методы кодирования, управление в СПС 104.5 KB
  Используемый частотный диапазон 400 450 800 900 1800 1900 МГц 2. Возможность роуминга Эстафетная передача Принцип выбора базовой станции с наибольшим уровнем сигнала MPS800 усовершенствованная мобильная телефонная служба диапазон частот 800МГц. Система работает в диапазоне 824894 МГц и имеет 666 дуплексных каналов при ширине полосы каждого канала 30КГц. Диапазон частот 825890 МГц.