|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.11.2015, 00:50 | #1 |
Пользователь
Регистрация: 09.12.2011
Сообщений: 23
|
Арифметические операции - Prolog
Помогите написать программу в прологе. Желательно Turbo Prolog.
Необходимо найти «срединный» элемент списка нечетной длины.. Вот пример для вычисления суммы четных элементов числового списка: Код:
|
10.11.2015, 08:38 | #2 |
Санитар
Старожил
Регистрация: 04.10.2008
Сообщений: 2,577
|
Берешь предикаты length и nth0 (в других видах пролога они встроенные, а в Turbo их надо дописать) и реализуешь очень просто:
Код:
|
10.11.2015, 22:46 | #3 |
Пользователь
Регистрация: 09.12.2011
Сообщений: 23
|
Спасибо! А можно еще пример запроса? Не очень пока разобрался в прологе, пробовал middle_element([1,2,3],Element). и не работает
(делал в ARITY PROLOG ) |
11.11.2015, 09:16 | #4 |
Санитар
Старожил
Регистрация: 04.10.2008
Сообщений: 2,577
|
Как именно "не работает"? Ошибки выдает какие-то или еще что-то?
|
11.11.2015, 10:29 | #5 |
Пользователь
Регистрация: 09.12.2011
Сообщений: 23
|
Выдает всегда no
Скорее всего сам запрос не правильный |
11.11.2015, 15:53 | #6 |
Санитар
Старожил
Регистрация: 04.10.2008
Сообщений: 2,577
|
INIFREY
код программы (для турпролога, вы ведь в нем запускаете?) целиком скиньте |
11.11.2015, 16:15 | #7 |
Пользователь
Регистрация: 09.12.2011
Сообщений: 23
|
Запускал в ARITY PROLOG.
Код использовал: Код:
Последний раз редактировалось INIFREY; 11.11.2015 в 16:23. |
11.11.2015, 18:30 | #8 |
Санитар
Старожил
Регистрация: 04.10.2008
Сообщений: 2,577
|
убери строку
Код:
Код:
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Арифметические операции | nikita-92 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 0 | 11.04.2013 00:08 |
Арифметические операции. | Saintpatrick38 | Помощь студентам | 2 | 05.04.2013 09:04 |
Арифметические операции | swillrocker | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 02.10.2012 21:31 |
Арифметические операции Ассемблер | BAV | Помощь студентам | 9 | 05.03.2008 00:21 |