Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Delphi > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 17.02.2013, 16:31   #1
Evelin_18
 
Регистрация: 09.12.2012
Сообщений: 8
По умолчанию алгоритм генерирования к-элементных подмножеств множества

Николаю поручили выбрать две песни для участия в концерте. Всего в его репертуаре n песен. Напишите программу, которая выводит на экран все возможные варианты. Количество песен n и их названия введите из текстового файла.Результат выведите в текстовый файл.
Evelin_18 вне форума Ответить с цитированием
Старый 18.02.2013, 10:16   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,260
По умолчанию

Если K равно двум (как в вашем условии), то проще всего делать так.
Код:
цикл по i от 1 до N
 внутри цикл по j от 1 до N
    если I<>J тогда - выдать Песню[i] и Песню[j]
при данном подходе будет считаться, что варианты
ПесняААА + ПесняZZZZ не то же самое, что ПесняZZZZ + ПесняААА
если же порядок песен не важен (т.е. вышеприведённый пример - это ОДИН вариант), тогда поможет код

Код:
цикл по i от 1 до N-1
 внутри цикл по j от i+1 до N
   Песню[i] и Песню[j]
Serge_Bliznykov вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
с++ Перебор всех возможных подмножеств множества целых чисел Modlika17 Помощь студентам 19 10.01.2012 10:09
Си/Си++ Выбор подмножеств из числового множества Маришка_Курносова Помощь студентам 4 11.09.2010 16:43
Генерирования звука в Delphi7 Miha85193 Мультимедиа в Delphi 18 04.06.2010 17:06
Эвристический алгоритм нахождения максимально(по размеру) независимого множества Zengor Помощь студентам 0 01.06.2010 18:42
множество подмножеств Visual C++ rest Помощь студентам 1 12.10.2009 09:23


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS