Программирование на языке ПРОЛОГ для искуственного интеллекта




Упражнения - часть 5


                                        то
                                                общ_предохр( Прибор1, Прибор2).

        факт:  различны( X, Y) :- not (X=Y).

        факт:  прибор( радиатор).
        факт:  прибор( лампа1).
        факт:  прибор( лампа2).
        факт:  прибор( лампа3).
        факт:  прибор( лампа4).

        факт:  соед( лампа1, предохр1).
        факт:  соед( лампа2, предохр1).
        факт:  соед( радиатор, предохр1).
        факт:  соед( лампа3, предохр2).
        факт:  соед( лампа4, предохр2).

        можно_спросить( вкл( П), вкл( 'Прибор') ).

        можно_спросить( работает( П), работает(' Прибор')).

line();

Рис. 14. 7.  База знаний для локализации неисправностей
в схеме, показанной на рис. 14.6.

14. 2.    Придумайте какую-нибудь задачу принятия решений и сформулируйте соответствующие знания в форме "если-то"-правил. Можете рассмотреть, например, планирование отпуска, предсказание погоды, простой медицинский диагноз и лечение и т.п.

Назад | Содержание | Вперёд




Содержание  Назад  Вперед