Форум программистов, компьютерный форум, киберфорум
Наши страницы
AutoLISP
Войти
Регистрация
Восстановить пароль
Другие темы раздела
AutoLISP Построить 2 фигуры http://www.cyberforum.ru/autolisp/thread1605939.html
Здравствуйте, помогите построить 2 фигуры(отдельно) через AutoLisp. Первая - фигура в виде чашки, ввторая - в виде гриба, особых параметров или указаний нет, спасибо большое.
AutoLISP AutoLisp Программирование с использованием двумерных списков Собственно, предыстория. Выбирая профессию для учебы, сильно лоханулся и начиная со второго курса мало что понимаю. Прошу помочь, возможно кому-то это легко. Помогите сдать сессию:cry: В данной... http://www.cyberforum.ru/autolisp/thread1603856.html
AutoLisp относительные координаты AutoLISP
Всем привет! Есть команда (command "pline" A "@10<45" "@10<0" "@-10<45" "") Она отлично работает при использовании константных значений в записи координат. Подскажите, каким образом возможно...
AutoLISP Отрисовка поверхности трохоиды (AutoLISP, 3dmesh)
Помогите разработать программу отрисовки поверхности с использованием команды “3dmesh”. Команда 3dmesh строит поверхность с помощью сетки (mesh): Command: 3dmesh M: число N: число Point(1,1):...
AutoLISP Обход двумерного массива на AutoLisp http://www.cyberforum.ru/autolisp/thread1589303.html
Преподаватель задал задачку. Необходимо совершить обход массива в соответствии с картинкой. Массив задается как список подсписков: каждая строка - подсписок. Буду очень благодарна, если натолкнете...
AutoLISP AutoLISP работа с файлом Здравствуйте! Необходимо реализовать вывод и ввод в файлы. Программа чертит заданную по условию фигуру и проверяет попадает ли точка в заштрихованную область. Пользователь может выбрать вводить ли... подробнее
Catstail
Модератор
24270 / 12239 / 2206
Регистрация: 12.02.2012
Сообщений: 19,866
08.01.2016, 22:17 0

AutoLisp, поменять порядок цифр числа

08.01.2016, 22:17. Просмотров 1072. Ответов 6
Метки (Все метки)

Ответ

В HomeLisp это будет так:

Lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
(defun task (n)
  (let ((l (explode n)))
    (if (member 3 l) (implode (reverse l)) n)))
 
==> task
 
(task 123)
 
==> 321
 
(task 124)
 
==> 124


Вернуться к обсуждению:
AutoLisp, поменять порядок цифр числа
2
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.01.2016, 22:17
Готовые ответы и решения:

Поменять порядок цифр числа на обратный
В архиве прилагаю мои, пока что нерешенные практические работы. Нужно решить там задачки(на...

Поменять порядок цифр числа N на обратный
общий алгоритм ясен , но проблема в том что я впервые работаю с визуальным приложением , и не знаю...

Поменять порядок цифр числа n на обратный
Вести число n.Поменять порядок цифр числа n на обратный.То есть число 12345 перевести в 54321. ...

Поменять порядок цифр числа на обратный
Поменять порядок цифр числа на обратный. Например, было 12345, стало 54321.

Поменять порядок цифр числа n на обратный
вести число n.Поменять порядок цифр числа n на обратный.

6
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru