Anatol писал(а) 21. Мая 2010 :: 14:21:

Я ж говорю, заполнить эту таблицу - не есть проблема. Эту таблицу я придумал, чтоб легче выдирать пары, которые не играли для любого выбранного игрока.

Иван, а разве не так? Насколько я помню, факториал числа  n - это количество перестановок n элементов.
Если ты про то, что пара 1-2 эквивалентна паре 2-1 - да, так и есть, но я намеренно заполнял таблицу "Пары" всеми возможными комбинациями чтобы в запросах писать условие:

WHERE Пары.Игрок1 = "Игрок_1" 

иначе пришлось бы писать так:

WHERE Пары.Игрок1 = "Игрок_1" OR Пары.Игрок2 = "Игрок_1" 

со всеми вытекающими...

berezdetsky писал(а) 21. Мая 2010 :: 14:39:

Ну да, наверное. Если будут какие-нибудь идеи - напиши обязательно. Я чё-т уже и сплю плохо 
Сейчас меня тянет в сторону алгоритмов с "деревьями", хотя я с ними вообще никогда не работал 

Помоему задача поставлена не совсем корректно.
по Швейцарской системе распределение пар еще зависит от результат предыдущего тура, выигравшие играют с выигрывавшими, а проигравшие с проигравшими.

#13 на верно следует перечитать правила, а то ерунда получается

Anatol писал(а) 21. Мая 2010 :: 16:50:

Давай на примере покажу.
Всего в чемпионате участвуют 6 человек: 1,2,3,4,5,6. В первом туре они разбиваются на пары согласно жребию (т.к. кол-во очков у всех = 0 и рейтинга ни у кого никакого нет) на вот такие пары:

Игрок1	Игрок2	Победитель
1	2	1
3	4	3
5	6	5

Во втором туре, согласно правилам, игроки разбиваются на подгруппы по количеству набранных очков. Мы имеем две подгруппы: 1,3,5 (Победители) и 2,4,6 (Проигравшие). Т.к. первая подгруппа имеет нечетное кол-во участников, то последнего выкидываем в ближайшую очковую группу. Тогда имеем такие подгруппы: {1,3} и {5,2,4,6}. Играем:

Игрок1	Игрок2	Победитель
1	3	3
5	2	2
4	6	4

Теперь перед 3-м туром имеем:
1. Игрок 3 имеет 2 очка
2. Игроки 1,2,4,5 имеют по одному очку
3. Игрок 6 имеет 0 очков
Разбиваемся на подгруппы (согласно очкам и правилу "четности"): {3,1,2,4}, {5,6}
Т.о. в 3-м туре имеем первую подгруппу, где некоторые игрокуи уже играли между собой. А именно:
Пара: 3 - 4
и Пара: 1 - 2

---

Как раз и надо составить тур для первой подгруппы, где на входе имеем доступные пары:
2-3
1-4
2-4
и список игроков: {1,2,3,4}

Иван, а вот ты бы поверил без оглядки высказыванию о том, что "практически все пары складываются однозначно"? Я не поверил, что всё может обойтись, а смоделировать все возможные комбинации, которые могут произойти в игре с 500 участниками я не в силах, поэтому и стал искать запасное решение.
Коэф-т Бухгольца конечно же учитывается при формировании групп. Этот пример я дал только для того, чтобы показать, что некоторые игроки могут попадать в одну группу несколько раз. Привести пример, где правило формирование групп и пар не сработало, не могу, ибо очень трудно придумать такую ситуацию. Но, как обычно и бывает, уже в боевых условиях такая ситуация запрсто может вылезти при первом же применении, а там уже ручками сами пользователи этой программы вряд ли смогут что-то сделать (читай "пестец турниру")

Общий алгоритм примерно такой:
1. Играем (вносим данные о сыгранных матчах)
2. Сортируем всех по (КоличествоОчков, Коэф. Бухгольца)
3. Разбиваем на подгруппы в зависимости от кол-ва очков
4. Разбиваемся на пары для игры. А именно:
  а)Пробуем классическим методом (первый из первой половины группы играет с первым из второй половины).
  б)Если он не срабатывает применяем обсуждаемый здесь алгоритм.
  в)Если и он не срабатывает, откатываемся на вариант (а) и забиваем на то, что некоторые играют друг с другом уже не впервый раз. Сыграют и еще разок.

и так для каждого тура.

И да, я тоже остановился на алгоритме с 2-мя вложенными циклами, но почему-то душа у меня к нему не лежит, кажется будто он делает что-то не так (доказать не могу  ).

JohnyDeath писал(а) 22. Мая 2010 :: 15:21:

Но ведь так и есть. Хотя я могу представить группу, для которой не будет существовать допустимого набора пар. "Сыграют и еще разок", IMHO, противоречит идее швейцарской системы.

JohnyDeath писал(а) 22. Мая 2010 :: 15:21:

Возможно, мы имеем ввиду разные алгоритмы. Я говорю о стандартном алгоритме генерации k-элементных подмножеств из комбинаторики.

berezdetsky писал(а) 22. Мая 2010 :: 16:27:

Даже при кол-ве игроков = 4 мы смоделировали ситуацию, где этот алгоритм обламывается. Вариант "Сыграют и еще разок" мне кажется лучше вариантов: "остановить весь турнир" или "присвоит этим игрокам автоматом какое-то кол-во очков"

berezdetsky писал(а) 22. Мая 2010 :: 16:27:


У меня примерно такой:

Функция ПолучитьПарыДляИгр(спИгроковГруппы//:СписокЗначений
	,спВозможныхПар//:СписокЗначений
	)

	спНераспределенныхИгроков = СоздатьОбъект("СписокЗначений");
	спИгроковГруппы.Выгрузить(спНераспределенныхИгроков);

	Для й=1 По спВозможныхПар.РазмерСписка() Цикл
		Результат  = СоздатьОбъект("СписокЗначений");
		текПара = спВозможныхПар.ПолучитьЗначение(й);
		Результат.ДобавитьЗначение(текПара);
		ПолучитьИгроковПары(текПара, Игрок1, Игрок2);
		УдалитьИзСписка(спНераспределенныхИгроков, Игрок1, Игрок2);
		Если спНераспределенныхИгроков.РазмерСписка()=0 Тогда
			Возврат Результат;
		КонецЕсли;

		Для ж=1 По спВозможныхПар.РазмерСписка() Цикл
			текПара_2 = спВозможныхПар.ПолучитьЗначение(ж);
			Если текПара=текПара_2 Тогда Продолжить;		КонецЕсли;

			Результат.ДобавитьЗначение(текПара_2);
			ПолучитьИгроковПары(текПара_2, Игрок1, Игрок2);
			УдалитьИзСписка(спНераспределенныхИгроков, Игрок1, Игрок2);
			Если спНераспределенныхИгроков.РазмерСписка()=0 Тогда
				Возврат Результат;
			КонецЕсли;

		КонецЦикла;
	КонецЦикла;

	Возврат "Решений нет!";
КонецФункции	// ПолучитьПарыДляИгр 

Это он же? 

А, ну да. Строчки

спНераспределенныхИгроков = СоздатьОбъект("СписокЗначений");
спИгроковГруппы.Выгрузить(спНераспределенныхИгроков); 

надо тоже засунуть в цикл.

Работает или нет - не знаю, пока это всё только в голове и на листочках.
Думаешь, что не прокатит? (хотя я тоже в нем сомневаюсь  )