Форум программистов, компьютерный форум, киберфорум
Lisp
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Lisp Небольшой вопрос по спискам https://www.cyberforum.ru/ lisp/ thread414899.html
Подскажите пожалуйста, что означает символ точка в списке. (defun isOut(X);Проверка на выход за границы доски (cond ((and (< 0 (car X)) (> 9 (car X)) (< 0 (cdr X)) (> 9 (cdr X))) T);Если координата X от 1 до 8 возвращяем T (T nil);Если она пуста то nil ) ) (defun isVisited(X Y);Проверка наличия координаты X в списке Y
Список Lst, что описывает вызов арифметической операции Lisp
Здравствуйте! Нужна помощь в написании еще одной програмки! Есть список lst, что описывает вызов арифметической функции. Написать функцию, которая в случае парности результата вычисления lst, делает его проверку на положительность, в противном случае возвращает сам lst. Вычисление lst сделать с помощью встроенной функции eval. Спасибо за помощь!! Буду благодарен!!
Lisp Описание функции, аргументом которой есть два списка Здравствуйте! Нужна помощь! В решение простой задачи! Описание функции, аргументом которой есть два списка, а результатом - список, что содержит элементы , что принадлежат только одному из первоначальных списков Спасибо, огромное! https://www.cyberforum.ru/ lisp/ thread414650.html Lisp Определить функцию, подсчитывающую число элементов списка без какого-либо указываемого элемента. https://www.cyberforum.ru/ lisp/ thread414281.html
Определить функцию, подсчитывающую число элементов списка без какого-либо указываемого элемента. Нашел здесь (defun count-list (list) (labels ((count-iter (result list) (if (null list) result (count-iter (1+ result) (cdr list))))) (count-iter 0 list)))
Определить рекурсивную функцию, возвращающую последний элемент списка Lisp
Определить рекурсивную функцию, возвращающую последний элемент списка. вот что сделано (defun last (xs) (if (null (cdr xs)) xs (last (cdr xs)))) Но тут получается что последний элемент выводится ввиде списка, а нужно чтоб просто выводился элемент, помогите исправить, заранее спасибо!
Lisp Глубина подсписка Определять максимальную глубину подсписков исходного списка Помогите пожалуйста. Функции высокого порядка https://www.cyberforum.ru/ lisp/ thread413372.html
Lisp Функция высокого порядка. Возвращать "n" элемент списка от начала списка. https://www.cyberforum.ru/ lisp/ thread413051.html
Помогите пожалуйста написать программу на Common Lisp. Задание: Возвращать "n" элемент списка от начала списка. >Применение: >(name 3 ‘(a d g h j)) g Рекурсивно и императивно функции я определил как : (setq name 3 '(a d g h j)) ;входные параметры v - номер элемента l - список
PROG функция, которая возвращает в качестве значения длину списка Lisp
Помогите разобраться в программе. Нужно преподу объяснить как она работает, а я ни как не вразумлю:( Само задание звучит так: Запишите с помощью предложения PROG функцию, которая возвращает в качестве значения длину списка (включая элементы подуровней). > (defun llen(alist) (prog ( (lst NIL) (LEN 0) ) loop (setq lst (car alist) ) (if (atom lst) (setq LEN (+...
Lisp сумма ряда. GNU Common Lisp https://www.cyberforum.ru/ lisp/ thread411955.html
вычислить сумму ряда 2/1+3/2...+(n+1)/n. у меня выводит ошибку в do, что не так??? (defun d (n) (do ((result 2)) ((= n 1) result) (setq result (+ result (/ (+ n 1) n))) (setq n (- n 1)))) >(d 2)
Lisp Сумма ряда и списки День добрый! Прошу помочь подправит код вычисления суммы ряда: http://s017.***********/i407/1112/5e/7b02c968ac31.jpg Вот что получилось у меня: (defun S (n x) ((zerop n) (list 1 1)) https://www.cyberforum.ru/ lisp/ thread411910.html
Lisp Сформировать список по правилу
Объединять два упорядоченных числовых списка без нарушения порядка, ИСПОЛЬЗУЯ функции высокого порядка. >(name ‘(2 4 7 9 13 16) ‘( 2 5 6 11 12)) (2 2 4 5 6 7 9 11 12 13 16) Помогите пожалуйста.
Lisp Вращение квадрата https://www.cyberforum.ru/ lisp/ thread411369.html
Помогите пожалуйста! Устала мучаться... не вижу своей ошибки. (defun VVOD () (setq p1(GETPOINT "\n введите точку центра:")) (setq L(GETDIST "\n введите начальную длину:")) ) (DEFUN QVAD (L A / p2 p3 p4) (SETQ p2 (polar p1 A L)) (SETQ p3 (polar p2 (+ A (/ pi 2))L))
0 / 0 / 0
Регистрация: 22.12.2011
Сообщений: 12
27.12.2011, 00:30  [ТС] 0

Задача на языке LSP - Lisp - Ответ 2332755

27.12.2011, 00:30. Показов 1540. Ответов 7
Метки (Все метки)

Ответ

no function definition: FIRST
консоль выдает это((

(defun max-min (l pred)
(if (null (cdr l)) (car l)
(if (funcall pred (car l) (second l))
(max-min (cons (car l) (cddr l)) pred)
(max-min (cdr l) pred))))

(defun f (l pred)
(if (null l) ()
(if pred
(cons (/ (car l) 2.0)
(f (cdr l) t)) l)))

(defun fun (l)
(f l (and (= (first l) (max-min l #'>))
(= (second l) (max-min l #'<)))))

Вернуться к обсуждению:
Задача на языке LSP Lisp
0
Заказать работу у эксперта
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
27.12.2011, 00:30
Готовые ответы и решения:

Подключение Common.lsp
Доброго времени суток, хотелось бы узнать как решить проблему следующего характера: Для работы с...

Почему просит загрузить приложение в AutoCAD во время выполнения .lsp?
Почему Автокад просит загрузить другое приложение в то время, как выполняется это? Такое появилось...

LINQ и LSP
Основа вопроса: хабр http://habrahabr.ru/post/191770/ из работ автора оригинальной статьи...

Не запускается .lsp скрипт
Здравствуйте! У меня возникла проблема с Autocad 2013, а точнее, с запуском lsp скрипта. Не знаю...

7
27.12.2011, 00:30
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
27.12.2011, 00:30
Помогаю со студенческими работами здесь

Установка Secret Net LSP
Помогите с установкой Secret net lsp. Выходит ошибка

Задача на языке с++
Ввести с клавиатуры целое число. Если число равно 1, то в заданных массивах Р(K), Q(L) и S(M)...

задача на языке Си
программа запрашивает ввод с терминала оператора , если оператор не выводит ответ в течение 10 с,...

Задача на функцию на языке Си
Дано натуральное n и m цифры.A(n,m) необходимо рассчитать значение, где A(n,m)={m+1,если n=0 ...

0
Новые блоги и статьи
Из чего и как собрать свой домашний кинотеатр
bt_guru 21.01.2025
Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .
Ошибки стиральных машин
bt_guru 21.01.2025
Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .
Копирование (маппинг) объектов в JavaScript
bytestream 21.01.2025
В современной разработке программного обеспечения копирование объектов представляет собой фундаментальную операцию, которая требует особого внимания и понимания. Маппинг объектов в JavaScript – это. . .
Как работать с Apache Kafka в C# .NET
bytestream 21.01.2025
Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки больших объемов информации в реальном времени. Эта система,. . .
Как использовать RabbitMQ в C# .NET
bytestream 21.01.2025
RabbitMQ представляет собой мощный брокер сообщений, который эффективно решает эту задачу, обеспечивая надежную передачу данных между множеством приложений. Этот инструмент реализует протокол AMQP. . .
Как объединить последние коммиты в Git
bytestream 21.01.2025
В мире разработки программного обеспечения система контроля версий Git стала незаменимым инструментом для управления исходным кодом. Одной из наиболее полезных, но порой сложных для освоения функций. . .
Как запушить новую локальную ветку (branch) в удалённый репозиторий Git и отслеживать её
bytestream 21.01.2025
В современной разработке программного обеспечения система контроля версий Git стала неотъемлемым инструментом для эффективного управления кодом и организации командной работы. Одной из ключевых. . .
Как создать директорию и все родительские директории, указанные в пути, с помощью Python
bytestream 21.01.2025
Python предоставляет мощные инструменты для работы с файловой системой через встроенные модули os и pathlib, которые значительно упрощают процесс манипуляции директориями. Эти модули содержат. . .
Как работать с массивами в JavaScript
bytestream 21.01.2025
Массивы в JavaScript представляют собой один из фундаментальных типов данных, который позволяет хранить упорядоченные коллекции различных элементов в одной переменной. Эта структура данных является. . .
Какая максимальная длина адреса (URL) в различных браузерах и стандартах
bytestream 21.01.2025
В современном мире интернет-технологий URL-адреса (Uniform Resource Locator) играют фундаментальную роль в функционировании веб-пространства. Эти уникальные идентификаторы ресурсов стали неотъемлемой. . .
Как сбросить локальный репозиторий до состояния удалённого репозитория Git
bytestream 21.01.2025
При разработке программного обеспечения с использованием системы контроля версий Git разработчики часто сталкиваются с необходимостью синхронизации локального и удаленного репозиториев. Данная задача. . .
Как запретить подсветку выделенного текста с помощью CSS
bytestream 20.01.2025
Подсветка текста при выделении является стандартным поведением браузера, которое не всегда соответствует дизайнерским решениям или функциональным требованиям веб-приложения. Выделение текста может. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru