> 1 <

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

Katrin26

Members


Статус

2 сообщений

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

#5324   2011-12-13 22:01 GMT+3 часа(ов)      
ПОМОГИТЕ,ПОЖАЛУЙСТА,составить программу на языке ЛИСП,используя процедуры:define,lambda!!!
. Определить функцию (ASSOC X L), где X – выражение, L -список вида:

((А1 B1)(A2 B2 )... (Аn Вn))

Результатом работы функции является подсписок списка L, в кото¬ром первый элемент совпал с X. Например:

ASSOC (АА ((А В)(С DD)(AA FОС))) = (АА FOC)

VH

Members


Статус

289 сообщений

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

#5325   2011-12-13 23:15 GMT+3 часа(ов)       
(defun ASSOC (X L)

 (cond

  ((null L) nil)

  ((atom (car L)) nil)

  ((equal (caar L) X) (car L))

  (T (ASSOC X (cdr L)))))

(defun ASSOC (X L)

 (if L

  ((lambda (elem)

    (cond

     ((atom elem) nil)

     ((equal (car elem) X) elem)

     (T (ASSOC X (cdr L)))))

   (car L))))

Katrin26

Members


Статус

2 сообщений

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

#5331   2011-12-14 00:09 GMT+3 часа(ов)      
Спасибо большое!надеюсь,что получу зачет!

VH

Members


Статус

289 сообщений

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

#5332   2011-12-14 00:20 GMT+3 часа(ов)      
Учтите, что еще необходимо переписать данные определения на тот диалект, который требуется Вам (по всей вероятности, это Scheme, ибо define). Надеюсь, что добрые люди это сделают.

Наташа Отаева

Members


Статус

1 сообщений

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

#7000   2013-04-21 03:49 GMT+3 часа(ов)      
Всем привет. Хочу начать изучать сайтостроение, чтобы самой сделать сайт. Подскажите, пожалуйста, такой самоучитель хорош для новичка: http://sdb.su/programmirovanie/web-programming/page,2,587-prakticheskie-raboty-po-web-programmirovaniyu.html или нужно найти что-либо другое?..
> 1 <


Онлайн :

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