Форум программистов, компьютерный форум, киберфорум
Наши страницы
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 работа с файлом Здравствуйте! Необходимо реализовать вывод и ввод в файлы. Программа чертит заданную по условию фигуру и проверяет попадает ли точка в заштрихованную область. Пользователь может выбрать вводить ли... подробнее
Artur Artur
0 / 0 / 0
Регистрация: 02.06.2014
Сообщений: 4
0

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

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

Необходимо перевернуть натуральное число n в том случае, если в него входит цифра 3. Я смог только проверить число на наличие тройки, а вот с переворотом беда. Помогите пожалуйста.

Lisp
1
2
3
4
5
(DEFUN REV(X)
(COND
((< X 10) (COND ((= X 3) T) (T nil)))
((= (REM X 10) 3) T)
(T (REV (FIX (/ X 10))))))


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

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

Поменять порядок цифр числа 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