Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Вывести таблицу значений 
V
    Опции темы
leporel
Дата 9.3.2011, 10:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 109
Регистрация: 12.2.2008

Репутация: нет
Всего: -1



Есть задана определить на принадлежность точку.

Код

domains
    I = integer

predicates

    checkX(I)

clauses
checkX(X):-
 not(X=-2), X<2, X>-10.


На запрос checkX(1) выводит Yes, а как сделать чтобы на запрос checkX(X) выводил допустимые числа удовлетворяющие условию?

Это сообщение отредактировал(а) leporel - 9.3.2011, 11:04
PM MAIL   Вверх
Грымзик
Дата 9.3.2011, 21:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 50
Регистрация: 7.10.2009

Репутация: 6
Всего: 6



Никак, ведь количество таких чисел бесконечно, если конечно Вас не интересуют только простые числа, иначе
Код

domains
    I = integer
predicates
    checkX(I)
    for(I,I,I)
clauses
for(A,A,_).
for(I,A,B):-A<B,A1=A+1,for(I,A1,B).

checkX(X):-for(X,-1000,1000),
 not(X=-2), X<2, X>-10.
 
goal
checkX(X),write(X),nl,fail.

PM MAIL   Вверх
leporel
Дата 9.3.2011, 22:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 109
Регистрация: 12.2.2008

Репутация: нет
Всего: -1



Спс!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума Prolog
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Prolog | Следующая тема »


 




[ Время генерации скрипта: 0.1041 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.