|
|
| Другие темы раздела | |
|
Lisp Написать программу сортировки списка методом пузырька
https://www.cyberforum.ru/ lisp/ thread2360475.html С комментариями пожалуйста |
Lisp Выбрать подсписок из многоуровневого списка, который имеет наибольшее значение (среда Home Lisp) В многоуровневом списке требуется выбрать подсписок, который имеет наибольшее значение. В случае, если таких подсписков имеется несколько, вывести их все рассматривать все, что включает в себя список |
|
Lisp Макросы (Scheme)
https://www.cyberforum.ru/ lisp/ thread2360017.html Вопрос по макросам в Scheme: В каком случае в определение макроса необходимо включать ключевые слова? Поясните на примере. Приведите примеры образца синтаксического правила для применения макроса к: (а) одному аргументу, (б) одному аргументу — пустому списку, (в) двум аргументам, один из которых является списком, состоящим не менее чем из одного элемента, а второй — списком строго из двух... |
Lisp Определение функций Последерево и Преддерево Выручите, пожалуйста! Разобралась как строить дерево, но с этим застряла Определите функции (ПРЕДДЕРЕВО а дерево) и (ПОСЛЕДЕРЕВО а дерево), которые выделяют в отдельное (упорядоченное) дерево из первоначального дерева все узлы, предшествующие данному элементу а и следующие за ним. дерево задается след образом: (5 (3 (1 nil nil) (4 nil nil)) (7 (6 nil nil) (13 (11 nil nil) (15 nil nil)))) https://www.cyberforum.ru/ lisp/ thread2359190.html |
|
Lisp Наибольший общий делитель(многочлены) Пусть P1, P2 и P3 - многочлены. Пусть Q1 является произведением P1 и P2, а Q2 произведением P1 и P3. Нужно написать процедуру, вычисляющую наибольший общий делитель (НОД) Q1 и Q2. Буду благодарен за любую помощь! |
Lisp Замена obj1 на obj2 во всех вложениях списка Доброе время суток, пишу функцию замены obj1 на obj2 в списке lst. Примерно понимаю, что от меня требуется, но вот реализовать не получается. Вот что я уже реализовал, но встретилась ошибка stack overflow (defun rep1(lst x y ) (cond ((null lst) nil) ((eql y (car lst)) (cons x (cdr(rep1 lst x y))) ) (t (cons (car lst) (rep1(x y (car lst)))))) ) https://www.cyberforum.ru/ lisp/ thread2358520.html |
|
Lisp Вычислить значение полинома Эрмита
https://www.cyberforum.ru/ lisp/ thread2358407.html Ребята, помогите написать код по LISP. Задание: Вычислить значение полинома Ермита. Вот решил эту задачку на SWI Prolog, может кому поможет ermit(0, _, 1). ermit(1, X, H) :- H is 2 * X. ermit(N, X, Hn) :- |
Исключить из данного списка такой элемент, чтобы сумма элементов, которые остались, была равна 10 Lisp Здравствуйте, не дружу с Лиспом, нужна помощь в решении задачи. Задание: Исключить из данного списка такой элемент, чтобы сумма элементов, которые остались, была равна 10. . Вот есть код SWI Prolog. del_rest(Xs, Sum, X, Ys) :- select1(X, Xs, Ys), sum_list1(Ys, Sum). |
| Lisp Вычисление интеграла по формуле Симпсона Здравствуйте, Столкнулся с упражнением в книге "Структура и интерпретация компьютерных программ" написать код для вычисления интеграла от x3 по формуле Симпсона: Написал следующий код: ;; процедура, определяющая вычисление интеграла Симпсона (define (simpson f a b n) (define (arg+ x) (+ x (/ (- b a) n))) (define (f x) (cube x)) (* (sum f a arg+ b) (/ (/ (- b a) n) 3))) https://www.cyberforum.ru/ lisp/ thread2358164.html | Lisp Поиск в дереве Здравствуйте! Пишу функцию поиска элемента в дереве. Вот что получилось: (defun searh (x lists) (cond ((null lists) nil) ((eql x (car lists)) (car lists)) (t (cond((< x (car lists)) (searh x (cadr lists))) (t (searh x (cddr lists))))) https://www.cyberforum.ru/ lisp/ thread2358148.html |
|
Функция square-digits-sum Lisp Работа программы то правильная,но я должен получать список take и drop я описал,но всё также не работает: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; 1. блок для реализации отложенных вычислений ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; макрос, создающий обещание (thunk из выражения expr) (defmacro delay... |
Lisp Normalize
https://www.cyberforum.ru/ lisp/ thread2357357.html Функции для normalize : +-normalize , sqrt-normalize , sin-normalize. Каждой функции передается выражение, представляющее корректный вызов соответствующей функции. Нормализация будет заключаться в унификации количества аргументов функции и нормализации аргументов: (+-normalize expr) : Если expr — вызов функции + без аргументов, то нормализованным выражением должен быть ноль — 0 . Если expr —... |
|
0 / 0 / 0
Регистрация: 26.11.2017
Сообщений: 289
|
|
| 0 | |
Написать программу объединения двух отсортированных списков в один - Lisp - Ответ 1310565428.11.2018, 21:34. Показов 1516. Ответов 1
Метки (Все метки)
Вернуться к обсуждению: Написать программу объединения двух отсортированных списков в один Lisp
0
|
|
| 28.11.2018, 21:34 | |
|
Готовые ответы и решения:
1
Написать программу объединения двух списков в третий так, чтобы нечетные (по номеру) элементы были из первого вписка, а четные - из второго. Написать программу для объединения двух произвольных векторов в один Написать программу объединение двух списков в один
|
| 28.11.2018, 21:34 | |
| 28.11.2018, 21:34 | |
|
Помогаю со студенческими работами здесь
0
Предикат определения множества объединения двух списков Объединения двух и более списков объектов по дате
Определить предикат для объединения элементов двух списков, находящихся в диапазоне от N1 до N2
|