VPF::Вывести таблицу значений - Форум программистов

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

Грымзик

Дата 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.

leporel

Дата 9.3.2011, 22:17 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Спс!

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