Lisp

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Lisp Функция калькулятор https://www.cyberforum.ru/ lisp/ thread1046593.html Вот собственно код задачи, функция калькулятор. "=====Calculator=====" (define tc1 (list 1 '* 2.11 '/ 13 '- 3 '+ 2)) (define tc2 (list 3 '* 2.11)) (define tc3 (list 3 '/ 5)) (define tc4 (list 2 '- 33)) (define tc5 (list 2 '+ 1)) (define (calc sp)	Lisp Определить функцию MY-REMOVE Определить функцию MY-REMOVE – рекурсивную версию REMOVE- функции.
Lisp Определить логическое действие ИЛИ Определить логическое действие ИЛИ для переменного количества аргументов (ИЛИ 1 x 2 x ... N x ) так, чтобы вычисления заканчива- лись, когда найдено i x , значение которого не NIL. https://www.cyberforum.ru/ lisp/ thread1046344.html	Lisp Функция для сортировки файла https://www.cyberforum.ru/ lisp/ thread1045421.html Добрый день. Имеется функция для сортировки одного файла и записи результата в другой. Проблема - не знаю как передать имена файлов. Если код полная чушь то как нормально реализовать? MuLisp или CommonLisp. (DEFUN APPL (lst1 lst2) ((NULL lst1) (APPEND lst3 lst2)) ((NULL lst2) (APPEND lst3 lst1)) ((< (CAR lst1) (CAR lst2)) (CONS (CAR lst1) (APPL (CDR lst1) lst2))) ...
Lisp графика. сечение в призме Написать функцию, которая в правильной шестиугольной призме проводит сечение, проходящее через одну из сторон нижнего основания и противоположную ей сторону верхнего основания	Lisp простая функция Помогите пожалуйста. Напишите функцию, которая определяет, является ли данное натуральное число простым. https://www.cyberforum.ru/ lisp/ thread1045224.html
Lisp Значение предиката равенства двух заданных множеств https://www.cyberforum.ru/ lisp/ thread1045075.html Решить с помощью базовых примитивов. Используя представление множества в виде списка реализуйте следующие операции над множествами. значение предиката равенства двух заданных множеств. По сути надо проверить равенство двух списков, такая функция есть но проверяет она только с учетом идентичной позиции элементов. Есть идея проверять разность двух списков и если она равна нулю выводить...	Lisp Удаление элементов из подсписков заданной глубины Заданы глубина подсписка и позиция. Удалить из всех имеющихся подсписков заданной глубины элементы, находящиеся на указанной позиции. Пожалуйста подскажите хотя бы с чего начинать, никак не могу придумать как это сделать используя лишь базовые примитивы и самостоятельно написанные на их основе функции((.
Lisp SICP: video original - playlist http://www.youtube.com/watch?v=2Op3QLzMgSY http://www.youtube.com/watch?v=dlbMuv-jix8 http://www.youtube.com/watch?v=bNykBgWB4gU&feature=c4-overview&list=UUxy0wWrBwBhlXAaEFmSJnYQ https://www.cyberforum.ru/ lisp/ thread1044064.html	Lisp SISP: video CS 61A Lectures - playlist https://www.cyberforum.ru/ lisp/ thread1044047.html http://www.youtube.com/watch?v=zmYqShvVDh4&list=PL9697DA147E483BC6
Lisp SICP: video-2 - playlist http://www.youtube.com/playlist?list=PLo6puixMwuSO8eB2uBH5lZy5kjNtdhTfT	Lisp исправить функционал "Строка" представляет собой список, подсписки - "слова". Литера b заменяется сочетанием литер ( (d, d) в данном случае). нужно исправить код, чтобы функционал не был "притянут за уши" (используя mapcar, например). (defun f1 (x s c) (cond ((eq (car x) s) (append c (f1 (cdr x) s c))) ((null x) nil) (T (cons (car x) (f1 (cdr x) s c))))) (defun f (f1 x s c) (cond ((null x) nil) ... https://www.cyberforum.ru/ lisp/ thread1043976.html

~~ur_naz~~

Заблокирован

18.12.2013, 17:30

Графика - Lisp - Ответ 5517549

18.12.2013, 17:30. Показов 2551. Ответов 3

Метки (Все метки)

Ответ

Lisp

(defun convert ( / bpt  cpt )
 
  (defun shiftXY (pt x y)
    (mapcar '+ pt (list x y))
  )
 
  (defun mkpline ( lst )
    (entmake
      (append
        (list
         '(0 . "LWPOLYLINE")
         '(100 . "AcDbEntity")
         '(100 . "AcDbPolyline")
          (cons 90 (length lst))
          (cons 70 0)
         '(210 0.0 0.0 1.0)
        )
        (mapcar '(lambda (x) (cons 10 x)) lst)
      )
    )
  )
  
  (if (setq bpt (getpoint "\nBase Point: "))
    (mkpline
      (list
        bpt
        (setq cpt (shiftXY bpt   0  30))
        (setq cpt (shiftXY cpt  40   0))
        (setq cpt (shiftXY cpt -40 -30))
        (setq cpt (shiftXY cpt  40   0))
        (setq cpt (shiftXY cpt   0  30))
        (setq cpt (shiftXY cpt -20  20))
        (setq cpt (shiftXY cpt -20 -20))
        (setq cpt (shiftXY cpt  40 -30))
      )
    )
  )
)

Вернуться к обсуждению:
Графика Lisp

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

18.12.2013, 17:30

Готовые ответы и решения:

построение графика функции заданного уравнением
Любую из этих задач решите, пожалуйста: 3.1. Построить график функции в окне...

Графика Lisp - сечение четырехугольной пирамиды
Написать функцию, которая в правильной четырехугольной пирамиде проводит сечение, проходящее через...

Графика: функция рисования равностороннего треугольника
Еще раз добрый вечер. HomeLisp-е написать функцию, запрашивающую у пользователя сторону...

Графика: сделать так, чтобы две линии, исходящие из одной точки, как бы шагали
надо сделать так, чтобы две линии, исходящие из одной точки, как бы шагали. пожалуйста

	18.12.2013, 17:30

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

18.12.2013, 17:30

Помогаю со студенческими работами здесь

Рисование графика: обработка новых входящих данных и движение графика на форме
Подскажите каким способом можно вывести график частью главного окна программы, при чем график...

Chart - диаграмма: изменить точность делений графика, установить центр графика в (0,0)
Создал диаграмму (все прекрасно считается точки расставляются), но есть проблемыЖ 1. В случае...

Автоматическое изменение графика при переносе данных, формулы и графика на другой лист
На первом листе, на основании каких-либо вычислений строим график, а затем полностью копируем...

Совмещение поточечного графика и графика построенного функцией на отрезке
Есть некий массив array1 = {...} и func = y /. NDslove По отдельности строю так: Plot и...

Блоги программистов
Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .	Полезные поделки на Arduino, которые можно сделать самому raxper 06.01.2025 Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .	Подборка решений задач на Python IT_Exp 06.01.2025 Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .	С чего начать программировать микроконтроллеры raxper 06.01.2025 Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер inter-admin 06.01.2025 Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .	Обновление сайта www.historian.by Reglage 05.01.2025 Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .	Как использовать GraphQL в C# с HotChocolate Programming 05.01.2025 GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .	Модель полного двоичного сумматора с помощью логических операций (python) AlexSky-coder 04.01.2025 def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()	Это мы не проходили, это нам не задавали...(асихронный счётчик с управляющим сигналом задержки). Hrethgir 04.01.2025 Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .	Руководство по созданию бота для Телеграм на Python IT_Exp 04.01.2025 Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .

Наверх