Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Языки программирования > Prolog
Перезагрузить страницу посчитать число возможных палиндромов
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
vf_adc vf_adc вне форума
Новичок
 
Сообщений: 4
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 09.11.2011
По умолчанию посчитать число возможных палиндромов - 09.11.2011, 22:24

Всем добрый вечер!
Необходимо посчитать число возможных палиндромов в исходной фразе, считая вложенные, т.е. есть список 1234321567 число палиндромов = 3
343
23432
1234321
на выходе должно быть колическо палиндромов и сами палиндромы.

Находил много исходников по палиндромам на форуме, переделать ума не хватает, некак я немогу осилить этот пролог, видимо недорос ещё))
заранее благодарен за помощь!

среда turbo prolog
Ответить с цитированием
  (#2 (permalink)) Старый
vf_adc vf_adc вне форума
Новичок
 
Сообщений: 4
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 09.11.2011
По умолчанию 16.11.2011, 14:37

выручите ребят!(
Ответить с цитированием
  (#3 (permalink)) Старый
aag aag вне форума
ушёл... не вернётся)))
 
Сообщений: 3,400
Сказал(а) спасибо: 0
Поблагодарили 82 раз(а) в 82 сообщениях
Регистрация: 29.11.2008
По умолчанию 16.11.2011, 14:56

prolog Код:
DOMAINS
i=integer il=i*
%
PREDICATES
p(il,il,i,i)
count(il,il,i,i)
%
CLAUSES
%
p(A,[B|C],D,E):- !, count(A,C,D,F), count([B|A],C,F,G), p([B|A],C,G,E).
p(_,_,A,A).
%
count([A|B],[A|C],D,E):- !, F=D+1, count(B,C,F,E).
count(_,_,A,A).
prolog Код:
Goal: p([],[1,2,3,4,3,2,1,5,5,1,6,7],0,Out)
Out=5
1 Solution
Goal: p([],[1,2,3,4,3,2,1,5,5,5,1,6,7],0,Out)
Out=7
1 Solution

Последний раз редактировалось aag; 16.11.2011 в 15:13
Ответить с цитированием
Пользователь сказал cпасибо:
vf_adc (17.11.2011)
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача по спискам (генерация всех возможных комбинацый) rainlin15 Prolog 0 30.11.2010 03:03
Нахождение всех палиндромов в списке batoon Prolog 54 06.12.2009 22:50
Как посчитать каждое четвертое число HeroDiver С/С++ 1 15.10.2009 21:02
Генерация вех возможных расстановок знаков boi4 Lisp 7 28.07.2009 13:30
Как разбить определенное число на одинаковое количество что бы получилось тоже число Anonymous Вопросы начинающих программистов 26 28.05.2009 18:25
Подсчитать число и сумму положительных, число и произведение отрицательных элементов Svetik08 Visual Basic 4 19.02.2009 15:12
Алгоритм возможных комбинаций Monah IRH PHP 8 18.11.2006 13:28
Нахождение палиндромов в списке Isav Prolog 7 03.05.2006 09:46
Перебор всех возможных комбинаций символов на Builder Fighter C++ Builder 5 15.11.2005 02:38
Дано двоичное число, получить десятичное число из него kochmonavt Pascal 1 20.12.2004 00:29
Даны числа X-число , Y-количество составить из X цифр Y число MiHanick Lisp 1 04.12.2004 15:48



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов