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


         

и черный король на одной



                бл( Поз, Лх : Лу),

                чк( Поз, Чх : Чу),

                ( Чх < Лх, СторонаХ is Лх - 1;

                  Чх > Лх, СторонаХ is 8 - Лх ),

                ( Чу < Лу, СторонаY is Лу - 1;

                  Чу > Лу, СторонаY is 8 - Лу ),

                Пр is СторонаХ * СторонаY,  !;

                Пр = 64.
      % Ладья и черный король на одной линии

        кк( _..Б..Лх : Лу.. Чх : Чу.._, Кх : Ку) :-

                                    % Критическая клетка

                ( Чх < Лх,  !,  Кх is Лх - 1;  Кх is Лх + 1),

                ( Чу < Лу,  !,  Ку is Лу - 1;  Ку is Лу + 1).


% Процедуры для отображения позиций

        отобр( Поз) :-

                nl,

                коорд( Y), nl,

                коорд( X),

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





Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий