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

Какая из приведенных ниже форм позволяет находить максимальный элемент 'i' списка 'L':

(Отметьте один правильный вариант ответа.)

Варианты ответа

(prog maxm (i L)   (setq i 0)    (setq L x)   A (cond ((Null L) (return i))    )   (cond ((> (car L) i) (setq i (car L))) )   (setq L (cdr L))   (go A) )

 (defun maxm (x) ( prog (i L)   (setq i 0)    (setq L x)   A (cond ((Null L) (return i))    )   (cond ((> (car L) i) (setq i (car L))) )   (setq L (cdr L))   (go A) ) )

(Верный ответ)

 (defun maxm (x) ( prog (i L)  A (cond ((Null L) (return i))    )   (cond ((> (car L) i) (set i (car L))) )   (set L (cdr L))   (Loop A) ) )

Похожие вопросы

Какая из приведенных форм позволяет обратить список 'L':

Какая из форм, представленных ниже, описывает оператор присваивания set, где Alist – ассоциативный список системы:

Каким образом можно получить элемент 'e списка ((a b cd) ((e f) g)):

C помощью каких форм можно посчитать количество элементов 'i' в списке 'x':

Какой из результатов вычисления формы (union '(1 2 3) '(1 2 5)) будет получен (учесть порядок следования элементов итогового списка). Функция Union имеет следующее определение:

(DEFUN UNION (X Y)        (COND          ((NULL X) Y)          ((MEMBER (CAR X) Y) (UNION (CDR X) Y) )          (T (CONS (CAR X) (UNION (CDR X) Y))) )) )  ))

Какой из результатов вычисления формы (union '(a b c) '(с a b)) будет получен (учесть порядок следования элементов итогового списка). Функция Union имеет следующее определение:

(DEFUN UNION (X Y)        (COND          ((NULL X) Y)          ((MEMBER (CAR X) Y) (UNION (CDR X) Y) )          (T (CONS (CAR X) (UNION (CDR X) Y))) )) )  ))

Какое из приведенных ниже выражений является примером правильного использования функционала map-el:

 (defun map-el (fn xl)                             (cond                                              (xl (cons (funcall fn (car xl) )                (map-el fn (cdr xl))        )    )  )   )

Какое из приведенных ниже выражений является примером правильного использования функционала map-el:

(defun map-el (fn xl)                             (cond                                              (xl (cons (funcall fn (car xl) )                (map-el fn (cdr xl))        )    )  )   )

Какой из результатов вычисления формы (rplacd (cddr x) (car x)), где x – список (a b c d), является верным:

Какой из результатов вычисления формы (rplaca x (cddr x)), где x – список (a b c d), является правильным: