На главную
ПРАВИЛА FAQ Помощь Участники Календарь Избранное DigiMania RSS
msm.ru
Коротко о разделе:
Здесь разрешается создавать темы, относящиеся к любому языку программирования, для которого не существует раздела на форуме (например, Lisp, Tcl/Tk, FORTRAN и т.д.). Если раздел для нужного Вам языка есть, большая просьба создавать тему в нем.
Вопросы, связанные с JScript, Perl, PHP обсуждаются в разделе WWW Masters.

Обратите внимание:
1. Прежде чем задать вопрос, воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали.
2. Если Ваш вопрос связан с конкретным языком программирования, обязательно укажите название языка в имени темы.
3. Постарайтесь давать темам информативные названия. Темы с названиями типа "Помогите, горю" будут удалены.
4. Помните, чем грамотней будет задан Ваш вопрос, тем больше будет у Вас шансов получить на него ответ. Как правильно задавать вопросы
5. Ипользуйте тег [ code ] ...текст программы... [ /code ] для выделения текста программы.

Просьбы выполнить какую-либо работу за автора в этом разделе не обсуждаются. Темы с подобными просьбами будут перемещены или удалены. Для заказов у нас существуют специальные разделы: Разовые заказы и подработка, ПОМОЩЬ СТУДЕНТАМ.

Если кто не понял (а такие есть) — чтобы за вас решали ваши задачки, идите на другие ресурсы.

Полезные ссылки:
Есть. ;)
Наши Исходники | GPSS (en), GPSS (ru) (!) | Common Lisp | Tcl/Tk | Haskell | Lua
Модераторы: B.V.
  
> Помогите пожалуйста найти ошибку)(Prolog), Пролог,нужна помощь
    Нужно что бы пролог вывел просто все названия металов,
    в столбик, но выбивает ошибку что не использованые предложения!

    -----------------------------------------------
    domains
    S=String
    M=Symbol
    predicates
    nondeterm Metal(M,S)
    nondeterm UnMetal(M,S)
    nondeterm Nabor(M,M)


    clauses
    Metal(M,Hidrargirum).
    Metal(M,Ferum).
    Metal(M,Aluminium).
    Metal(M,Titan).
    Metal(M,Cuprum).
    Metal(M,Uranium).
    Metal(M,Franziy).
    Metal(M,Zinck).
    Metal(M,Kaliy).
    Metal(M,Rubidiy).
    Metal(M,Aurum).
    Metal(M,Argentum).
    Metal(M,Magniy).
    Metal(M,Calciy).
    Metal(M,Cesium).
    Metal(M,Radon).
    Metal(M,Wolfram).
    Metal(M,Nicel).

    UnMetal(U,Silicium).
    UnMetal(U,Oxygen).
    UnMetal(U,Hydrogen).
    UnMetal(U,Phosphorus).
    UnMetal(U,Sulfur).
    UnMetal(U,Borum).
    UnMetal(U,Carbon).
    UnMetal(U,Chlor).
    UnMetal(U,Selen).
    UnMetal(U,Arsen).
    UnMetal(U,Bromium).
    UnMetal(U,Iodum).
    UnMetal(U,Argentum).
    UnMetal(U,Helium).
    UnMetal(U,Ftor).
    UnMetal(U,Krypton).
    UnMetal(U,Xenon).
    UnMetal(U,Radon).
    UnMetal(U,Neon).

    Nabor(X,Y):-
    Metal(M,X),UnMetal(U,Y),nl,fail.

    Goal
    Nabor(X,Y).
    /*write("Metals are: ",Metal,"Un Metals are",UnMetal).*/
    Сообщение отредактировано: Евгений228 -
      А когда это радон стал металлом? :blink:
        Цитата Славян @
        А когда это радон стал металлом? :blink:

        Если что UnMetal это Не металы
          А!, пардон. Я увидел вначале, что он объявлен металлом, а более позднее переобъявление не углядел. :oops:
            А в прологе строки разве в кавычки не берутся?
            Всё написанное выше это всего лишь моё мнение, возможно ошибочное.
            1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
            0 пользователей:


            Рейтинг@Mail.ru
            [ Script Execution time: 0,0678 ]   [ 14 queries used ]   [ Generated: 18.10.17, 16:44 GMT ]