Задача на логику Опции

[Tenshi]

В парламенте острова Невезения каждый из N = 6 депутатов имеет не более М = 2 врагов. ( Если А - враг Б, то Б - враг А). Для уменьшения разногласий президент решил преобразовать парламент в двухпалатный.
Составить программу, которая проверяет, можно ли парламент разделить на две палаты так, что быу каждого депутата в своей палате было не более М врагов.

[Michael_Rybak]

З.ы. Теорию вероятности не знаю, ибо такого не учил.

в этой задаче она не понадобится.

З.з.з.ы А как это через циклы сделать йа что-то не пойму?

смотри. у тебя шесть человек. каждый будет либо в палате 1, либо в палате 2. шестью вложенными циклами перебираем, кто в какой палате:

for a := 1 to 2 do // номер палаты, в которую попал депутат A
  for b := 1 to 2 do // номер палаты, в которую попал депутат B
    for с := 1 to 2 do 
      for d := 1 to 2 do 
        for e := 1 to 2 do 
          for f := 1 to 2 do begin

            //проверяем, не нарушается ли условие для депутата А

            a_enemies := 0; // считаем количество врагов А в его палате

            //a и b попали в одну палату и при этом враждуют?
            if (a = b) and (is_enemy[a, b]) the inc(a_enemies); 

            //a и с попали в одну палату и при этом враждуют?
            if (a = с) and (is_enemy[a, с]) the inc(a_enemies); 

            ... // то же для d, e, f

            if a_enemies > m then break; //условие не выполнилось

            //проверяем точно так же для депутата В
            b_enemies := 0;     
            ...

            //проверяем точно так же для депутатов С, D, E, F

            // если ни один break не сработал, решение найдено, выводим его
          end;