Найдите исполнителя для вашего проекта прямо сейчас!
Разместите заказ на фриланс-бирже и предложения поступят уже через несколько минут.

Нужно перевести код с Visual Prolog на Turbo Prolog

domains

персона = п(string,string)

друзья = персона*

sl = string*

predicates

nondeterm решение(друзья)

nondeterm принадл(string,sl)

nondeterm принадл(персона,друзья)

имеет_сестру(string)

младший(string)

старше(string,string)

clauses

имеет_сестру("Борисов").

младший("слесарь").

старше(X,Y):- not(младший(X)),X

решение(Друзья):-

Профессии=["слесарь","токарь","сварщик"],

принадл(Борисов,Профессии),

принадл(Иванов,Профессии),Иванов

принадл(Семенов,Профессии),Семенов

Друзья=[п("Борисов",Борисов),п("Иванов",Иванов),

п("Семенов",Семенов)],

принадл(п(Слесарь,"слесарь"),Друзья),

not(имеет_сестру(Слесарь)),

старше(Семенов,"токарь").

принадл(Эл,[Эл|_]).

принадл(Эл,[_|Список]):- принадл(Эл,Список).

goal

решение(Друзья).

15 лет назад
GeminiPro
Максим 
35 летРоссия
16 лет в сервисе
Был
8 лет назад
  • Похожие заказы
  • $50

    Необходимо сравнить данные из файла excel, содержащего справочник (код+наименование) с документом word, в котором данный справочник используется. В результате должен быть протокол соответствия. ТЗ : HTTP://elias.ru/fo/tz.rar

    Закрыт
    15 лет назад
  • Нужно чуть исправить 2 скриптаю Работы на 1-2 часа. Есть 2 програмки нужно сденлать запись в файл некоторых полей. Оставляйте тут свои контакты и стоимость. Сделать нужно сегодня

    Закрыт
    15 лет назад
  • Здравствуйте. Написать программу на Borland C++ 3.1. Решить систему ОДУ методом Рунге-Кутта для 2 неизвестных. Уже имеется программа для решения уравнений этим методом. Не могу сделать для системы.

    Прикладное ПО1 исполнитель
    Завершен
    15 лет назад
  • Имеется БД, спроектированная по следующей теме с учётом всех требований: Информационная система городской телефонной сети: ГТС представляет собой разветвлённую сеть локальных АТС. АТС подразделяются на городские, ведомственные и учрежденческие и, возможно, обладают характерным только для этой группы ...

    Прикладное ПО1 исполнитель
    Завершен
    15 лет назад
  • Доброго времени суток! Нужно написать консольную программу на С++. Желательно в C++ Builder 6. Сможете ли её написать, как скоро и за какую сумму? Вот текст задачи: Информационные агентства Разработать приложение, позволяющее организовать регистрацию информационных агентств (печать, ...

    Закрыт
    15 лет назад
  • $1000

    Плагин для IE. Перехватывать и сохранять потоки загружаемые в Internet Explorer(видео, аудио). + ToolBar для управления сохранением захваченных потоков. MS VC++/C# Реализация: Переопределить протоколы доступа IE к интернету. HTTP/FTP/HTTPS/RTSP/MMS/RTMP Документация, http://msdn.microsoft.com/en-us/library/aa767743(VS.85).aspx пример есть здесь: http://home.nyc.rr.com/itandetnik/ программа аналог : http://www.orbitdownloader.com/download.htm смотрим Grab ...

    Закрыт
    15 лет назад
  • $100

    Необходимо создать «универсальный» авторан. Мини ТЗ. Программа имеет две пользовательские части: 1. часть, в которой администратор сможет создавать древовидное меню 2. часть которая непосредственно записывается на диск и запускается пользователями В папках могут лежать как подпапки, так и другие файлы, ...

    Закрыт
    15 лет назад
  • 1. Общие сведения Создание на базе стандартной конфигурации системы «1С:Предприятие» с версии 7.7 (торговля), или 8.1 (управление производством) на выбор исполнителя. 2. Назначение и цели создания системы Разработка функционала доработанной конфигурации, реализованной на базе типовой конфигурации «Торговля ...

    Закрыт
    15 лет назад
  • Здравствуйте программисты С++. Нужна ваша помощь, само собой вознаграждаемая. Нужно : 1. Реализовать шифр RSA на С++ 2. Реализовать шифр DES на С++ Всё это дело вместе с ключами читаеться из фала и туда же записываеться. Цена вопроса 15-20 вмз. Дело ...

    Закрыт
    15 лет назад