Форум программистов, компьютерный форум, киберфорум
Lisp
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Lisp Из заданного списка удалить каждый второй элемент Из заданного списка удалить каждый второй элемент, результирующий список переписать в обратном порядке. https://www.cyberforum.ru/ lisp/ thread581478.html LISP простая рекурсия Lisp
необходимо написать маленькую программу, с использованием управляющих форм LISPa. реализовать: нахождение разности списков R=S1/S2 (элементы всех уровней). тип рекурсии: параллельное ветвление рекурсии. форма представление результата: результатом есть список, содержащий исходный и результирующие. помогите пожалуйста!. спасибо!
Lisp Циклы с окружностью Помагите зделать следующую программу,чтобы в цикле рисовалось несколько окружностей https://www.cyberforum.ru/ lisp/ thread581154.html Lisp Даны два списка, построить третий по условию Ребята, помогите, пожалуйста. В лиспе не понимаю совсем. Даны списки L1 и L2 элементов типа char. Построить список L3 по следующему правилу: - если L1 является префиксом L2, то получить L3, исключив этот префикс и добавив его в качестве суффикса; - в противном случае получить L3, присоединив к L1 список L2. https://www.cyberforum.ru/ lisp/ thread580750.html
Проверка на чётность в mulisp'e Lisp
Добрый вечер. Если кого-то нибудь не затруднит, помогите пожалуйста написать программу на mulisp'e: EvenLengyh(Lst) - Проверяет на четность количество элементов в списке Lst
Lisp Обработка многоуровнего списка https://www.cyberforum.ru/ lisp/ thread580111.html
Добрый день. Помогите, пожалуйста, разобраться со следующей проблемой: необходимо переделать код, что бы была возможность обработать многоуровневый список. Задание: Определите функцию (f s n), которая из списка чисел s создает новый список, прибавляя к каждому атому число n. Исходный список не предполагается одноуровневым. (defun f (s n) (let ((l (length s)) (res nil))
Lisp Нарисовать снеговика в VISUAL lisp https://www.cyberforum.ru/ lisp/ thread580059.html
(setq p1 (getpoint "Укажите точку")) (command "_sphere" p1 100) (setq p2 (list (car p1) (+(nth 1 p1)175)(last p1))) (command "_sphere" p2 75) (setq p4 (list (car p1) (+(nth 1 p1)300)(last p1))) (command "_sphere" p4 50) (setq p3 (list (+(car p1)20) (-(nth 1 p1)200) (+(last p1)100))) (setq p5 (list (+(car p1)20) (-(nth 1 p1)100) (-(last p1)50))) (command "_cylinder" p3)
Дан список, элементы которого — натуральные числа. Умножить каждый элемент на 2 Lisp
Пожалуйста помогите, решением, я дноо
Lisp Помогите пожалуйста https://www.cyberforum.ru/ lisp/ thread578047.html
Вычисляющие и не вычисляющие присваивания
Lisp Найти частичную сумму ряда помогите решить задачу. \sum \limits_{i=1}^n \frac{\sin x}{x^i} https://www.cyberforum.ru/ lisp/ thread577852.html
Рекурсия: вернуть список, содержащий элементы первого списка, не принадлежащие второму списку Lisp
Помогите!!! 1) Описать функцию, аргументами которой являются два списка, а результатом список, содержащий элементы первого списка, не принадлежащие второму списку.
Lisp Рекурсивные функции https://www.cyberforum.ru/ lisp/ thread577385.html
Всем доброго времени суток! Дали курсовую по Лиспу: 1) Разработать реурсивную функцию, заменяющую в любом месте префиксного алгебраического выражения (*f1) на f 2) Разработать рекурсивную функцию, осуществляющую сложение числа с натуральным числом только с помощью функции прибавления единицы add1. Помогите сделать. Заранее спасибо!
0 / 0 / 0
Регистрация: 21.05.2012
Сообщений: 11
26.05.2012, 16:21  [ТС] 0

Дерево задано с использованием вложенных списков Определить максимальный уровень вершины - Lisp - Ответ 3084272

26.05.2012, 16:21. Показов 2158. Ответов 10
Метки (Все метки)

Ответ

Lisp
1
2
3
4
5
6
7
8
9
(defun max-level (x) (cond ((null x) 0)
                           (t  (max (+ 1 (max-level (cadr x))) 
                                    (+ 1 (max-level (caddr x)))))))
 
==> max-level
 
(max-level '(1 (-1 nil nil) (2 nil (3 nil nil))))
 
==> error: bad function -1

в чем ошибка?? не понимаю

Вернуться к обсуждению:
Дерево задано с использованием вложенных списков Определить максимальный уровень вершины Lisp
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.05.2012, 16:21
Готовые ответы и решения:

Дерево задано с помощью вложенных списков, определить число вершин в дереве
1. Определите функцию, которая спрашивает имя пользователя и здоровается с ним. (defun hello ()...

Построить бинарное дерево поиска. Определить уровень узла с максимальным элементом
Из входной последовательности вещественных чисел построить бинарное дерево поиска. Определить...

Задано бинарное дерево. Определить, есть ли в этом дереве хотя бы два одинаковых элемента
Не могу никак придумать сам алгоритм. Есть мысли: сравнивать последовательно каждый элемент с...

Определить количество вхождений вершины с заданным элементом Е в бинарное дерево
Добрый день! Помогите решить задачу: Написать программу, которая определяет количество вхождений...

10
26.05.2012, 16:21
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.05.2012, 16:21
Помогаю со студенческими работами здесь

Заданы два дерева с помощью цепных списков. *Определить, является ли второе дерево поддеревом первого
Заданы два дерева с помощью цепных списков. *Определить, является ли второе дерево поддеревом...

Задано вершины треугольника ABC: А (7;2), B (1;9) и С(-8;-11)
Задано вершины треугольника ABC: А (7;2), B (1;9) и С(-8;-11). Найти: величину углов A, B, C;...

Определить функцию, объединяющую атомы двух списков С ИСПОЛЬЗОВАНИЕМ ПАРАЛЛЕЛЬНОЙ РЕКУРСИИ
Помогите определить функцию, объединяющую атомы двух списков в один ассоциативный список...

Обработка двух вложенных списков
Есть два списка: 1. 2. Как вывести индексы второго списка, значения которых отличаются от...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru