Сколько комбинаций можно составить из разных символов, если они повторяются

@Pupul of LIT · Регистрация: 27.10.2009

Студворк — интернет-сервис помощи студентам

Собственно, такая задача: Даны n карточek, на которых написано ОДНА буква. Сколько Комбинаций можно составить из этих карточек(если символы повторяються)(выборок n по n) Тут, конечно комбинаторика...Формула N!/M1!*M2!*...*Mn!, где м1,м2,мн-кол0во повторяющхся одинаковых символов. Сделать то для разных- не проблема...А вот если буквы однаковые...Я отсортировал массив, дальше ступор...
ЗЫ Можно уложиться в тип longint
ПРИМЕР:
Строка aab, ее выборки: aab,aba,baa, т.е. всего 3 выборки.
Спасибо!

@Inadequate · 02.12.2009, 22:16

Pupul of LIT, Вам никто не виноват что Вы дотянули до последнего дня. Перестаньте бесконечно апить Вашу тему.

@Pupul of LIT · 02.12.2009, 22:40 **[ТС]**

Действительно, прошу прощения за "апанье", я понимаю, что никто не должен мне помочь, что ж, сдам, что есть. Но если будет возможность, напишите пожалуйста решение, все же интересно, а это в зачет идет

@Pupul of LIT · 03.12.2009, 19:35 **[ТС]**

вырезанно(автор сильно расстроен)

Добавлено через 9 минут
Извините за выражение, НО
Извините, не знал.(Точнее, не читал правила форума, впрочем, как и все остальные).
Вы, Inadequate, я смотрю, не так уж хорошо владеете русским языком, а раскидываетесь своими выражениями. Я с Украины и то, пограммотнее Вас. Если никто не может решить предложенную задачу, закрыли бы уже тему.

@Inadequate · 03.12.2009, 19:52

Извините, не знал.(Точнее, не читал правила форума, впрочем, как и все остальные).

Незнание, не освобождает от ответственности. То что Вы их не читали, Вас не красит.

Вы, Inadequate, я смотрю, не так уж хорошо владеете русским языком, а раскидываетесь своими выражениями. Я с Украины и то, пограммотнее Вас.

Этим самым Вы нарушаете еще одно правило форума. Если Вы не прочли правила в первый раз, так не поленитесь прочесть их сейчас...

Если никто не может решить предложенную задачу, закрыли бы уже тему.

Не стоит указывать, что мне делать. Вопрос с закрытием тем я могу решить и без Ваших советов.

@Pupul of LIT · 03.12.2009, 20:18 **[ТС]**

Ладно, прочту правила форума и сделаю выводы...извините за оскорбления.

Добавлено через 20 минут
Неужели никто не может решить??

@TAVulator · 03.12.2009, 20:30

держи:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Var
 i, j, N, M, Mt: integer;
 S: string;
 G: set of char;
Function Fac(n:integer):longint;
begin
 if n<2 then Fac:=1
  else fac:=n*fac(n-1);
end;
Begin
 Write('Введите строку: ');
 Readln(S);
 N:=Fac(length(s));
 M:=1;
 For i:=1 to length(S)-1 do
  Begin
   Mt:=1;
   If not (S[i] in G) then
   For j:=i+1 to length(S) do
    If S[j]=S[i] then inc(Mt);
   M:=M*Fac(Mt);
   G:=G+[S[i]];
  End;
 N:=N div M;
 Writeln('Возможных комбинаций: ',N);
End.

@Pupul of LIT · 03.12.2009, 21:57 **[ТС]**

Спасибо, единственно, что непонятно, это эта строка:

Сообщение от TAVulator

If not (S[i] in G) then

Проверяется, не принадлежит ли символ строки типу чар??

@TAVulator · 03.12.2009, 21:59

Pupul of LIT, нет. тут проверяется на то, что не проверялся ли данный символ раньше.

@Pupul of LIT · 03.12.2009, 22:04 **[ТС]**

Понятно, спасибо Вам огромное!

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@Pupul of LIT 3 / 3 / 2 Регистрация: 27.10.2009 Сообщений: 37

	Сколько комбинаций можно составить из разных символов, если они повторяются 02.12.2009, 22:14. Показов 7350. Ответов 9 Метки нет (Все метки) Собственно, такая задача: Даны n карточek, на которых написано ОДНА буква. Сколько Комбинаций можно составить из этих карточек(если символы повторяються)(выборок n по n) Тут, конечно комбинаторика...Формула N!/M1!M2!...*Mn!, где м1,м2,мн-кол0во повторяющхся одинаковых символов. Сделать то для разных- не проблема...А вот если буквы однаковые...Я отсортировал массив, дальше ступор... ЗЫ Можно уложиться в тип longint ПРИМЕР: Строка aab, ее выборки: aab,aba,baa, т.е. всего 3 выборки. Спасибо! 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	02.12.2009, 22:16
	Pupul of LIT, Вам никто не виноват что Вы дотянули до последнего дня. Перестаньте бесконечно апить Вашу тему. 0

@Pupul of LIT 3 / 3 / 2 Регистрация: 27.10.2009 Сообщений: 37
	02.12.2009, 22:40 [ТС]
	Действительно, прошу прощения за "апанье", я понимаю, что никто не должен мне помочь, что ж, сдам, что есть. Но если будет возможность, напишите пожалуйста решение, все же интересно, а это в зачет идет 0

@Pupul of LIT 3 / 3 / 2 Регистрация: 27.10.2009 Сообщений: 37
	03.12.2009, 19:35 [ТС]
	вырезанно(автор сильно расстроен) Добавлено через 9 минут Извините за выражение, НО Извините, не знал.(Точнее, не читал правила форума, впрочем, как и все остальные). Вы, Inadequate, я смотрю, не так уж хорошо владеете русским языком, а раскидываетесь своими выражениями. Я с Украины и то, пограммотнее Вас. Если никто не может решить предложенную задачу, закрыли бы уже тему. 0

@Pupul of LIT 3 / 3 / 2 Регистрация: 27.10.2009 Сообщений: 37
	03.12.2009, 20:18 [ТС]
	Ладно, прочту правила форума и сделаю выводы...извините за оскорбления. Добавлено через 20 минут Неужели никто не может решить?? 0

@TAVulator ⚽ 4191 / 1292 / 237 Регистрация: 27.07.2009 Сообщений: 3,962
	03.12.2009, 21:59
	Pupul of LIT, нет. тут проверяется на то, что не проверялся ли данный символ раньше. 0

@Pupul of LIT 3 / 3 / 2 Регистрация: 27.10.2009 Сообщений: 37
	03.12.2009, 22:04 [ТС]
	Понятно, спасибо Вам огромное! 0