игра домино

Тема в разделе "Delphi - FAQ", создана пользователем blackcat, 4 май 2009.

  1. blackcat

    blackcat Гость

    условие задачи:
    //Известен набор костей домино для каждого из двух игроков.
    //Необходимо проверить существует ли последовательность ходов, приводящая к
    //"рыбе"."РЫБА" - ситуация, в которой у двух игроков есть кости, но ни один из
    //них не может сделать ход.

    типы данных:
    TBone=record //кости домино
    left,right:string; //левая и правая половинка костяшки
    end;
    TIndex=array of integer; //массив индексов
    TDomino=array of TBone; //массив костей

    сам код в прикрепленном файле.
    задача на комбинаторные алгоритмы.как я поняла,все решение основывается на генерации перестановок индексов костей домино(см.код).остается только проверить полученную перестановку:"рыба"или нет.вот в проверке,как мне кажется,и ошибка.но найти я ее не могу. помогите,пожалуйста!
     

    Вложения:

    • ___.txt
      Размер файла:
      6,9 КБ
      Просмотров:
      54
  2. blackcat

    blackcat Гость

    задача сдана.тема может быть удалена.
     
Загрузка...

Поделиться этой страницей