[kotiuma_drug]

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

[Nehoroshev]

Я не понял, это у тебя головоломка типа пятнашек или игра с компьютером в роде уголков? И если я правильно понял то поле у тебя 3 на 4 - не слишком ли мало?

[NumLock]

я так это так понял:

только я не понял смысла игры - там же никаких комбинаций кроме одной, имхо, нет
по таким правилам толькот 1 фишка может достичь противоллположного конца
...или не обязательно по очереди ходить?

[Nehoroshev]

kotiuma_drug, поясни условие.

[kotiuma_drug]

правильно понял только 'num_look' и ходить по очереди не обязательно

[kotiuma_drug]

ты прав!!!!!!!!!!!но там не обязательно по очереди ходить!!!!!!!!!!!!!!!!!

[NumLock]

Код:

var
  pole: array [0..8] of Byte;

function CheckEnd: Boolean;
begin
  Result:=(pole[0]=2) and (pole[1]=2) and (pole[2]=2) and (pole[3]=2)
          and (pole[4]=0) and
          (pole[5]=1) and (pole[6]=1) and (pole[7]=1) and (pole[8]=1);
end;

initialization
  pole[0]:=1;
  pole[1]:=1;
  pole[2]:=1;
  pole[3]:=1;
  pole[4]:=0;
  pole[5]:=2;
  pole[6]:=2;
  pole[7]:=2;
  pole[8]:=2;