Форум Винского

Обращаюсь ко всем, отметившимся в этой теме и модераторам (в первую очередь)!
Уважаемые коллеги!
Давайте решим вопрос по этой (и подобным) темам однажды и навсегда.
Можно ли выяснить, что случилось с топикстартером? Если "Да" - то что? Если он (не дай Бог) плохо очень себя чувствует и не может продолжать дискуссии и отвечать за свои предложения - пожелаем ему здоровья и закроем тему. Если он бодр и весел, то пусть ответит на свой же вопрос и одарит победителя обещанным (его никто за язык не тянул) призом.
И хотелось бы (на будущее), т.к. человек я азартный и за базар отвечающий сам, чего и от других хотел бы, определить время, через которое тему без продолжения (может?) закрыть и стартеру запретить подобное, пока не ответит за сказанное ранее.
С надеждой на понимание

**Kamal** » 25 апр 2010, 16:22

Дмитрий Июньский писал(а):Если он бодр и весел, то пусть ответит на свой же вопрос и одарит победителя обещанным (его никто за язык не тянул) призом.

Пока ищут ТС, хотел бы задать встречный вопрос. А что, кто-то предложил в этой теме внятное решение задачи, я уж не говорю о "самом красивом", а ведь именно это было условием присуждения приза, не так ли? Или я что-то проглядел?

Kamal писал(а):
Дмитрий Июньский писал(а):Если он бодр и весел, то пусть ответит на свой же вопрос и одарит победителя обещанным (его никто за язык не тянул) призом.

Пока ищут ТС, хотел бы задать встречный вопрос. А что, кто-то предложил в этой теме внятное решение задачи, я уж не говорю о "самом красивом", а ведь именно это было условием присуждения приза, не так ли? Или я что-то проглядел?

Решений было предложено несколько. Автор должен выбрать. Красивое, кривое, правильное или любое другое.

**aaa_2** » 05 май 2010, 08:47

program dr;
var
d: array [1..365] of integer;
v,k,i,j,N,CH: integer;
s: real;
begin
N:=1000000;
ch:=26;
v:=0;
for j:=1 to 365 do
d[j]:=0;
for k:=1 to N do
begin
k:=k+1;
for j:=1 to ch do
begin
j:=j+1;
i:=Random(365);
d[i+1]:=d[i+1]+1;
end;
;
for j:=1 to 365 do
begin
if d[j]=3 then
v:=v+1;
d[j]:=0;
end;
;
end;
;
s:= v/N;
write(s);
end.

результат
0.00105

это "количество событий" в конторе из 26 человек, что бы получить вероятность надо понять вероятность чего?
для примера если в конторе 2600 человек то будет порядка 40 дней с 3 др...

по этому можно нормировать на количество дней... тогда делить на 365...

а можно задаться вопросом какова вероятность что среди этой толпы окажется день рождение у 3 в один день...тогда надо делить на количество людей (и по всей видимости умножить на 3, так как у 3х др)
ps
интересно что функция имеет максимум(при нормировании на количество дней...)... понятно что чем больше народа тем выше вероятность, но начиная с некоторого числа вероятность начнет снижаться...(это вроде очевидно если в конторе 1 000 000 человек, то очень мала вероятность что найдется день с 3 др, все больше 1000 в один день, да по 2000...)

при нормировании на количество народа максимум значительно раньше наступает...

**Alex_ka** » 05 май 2010, 09:35

Помните анекдот:
Математика, физика и инженера попросили доказать или опровергнуть следующее предположение: "Все нечетные числа, большие трех, являются простыми".
Решение математика: 3-да, 5-да, 7-да, 9-нет : предположение ложно.
Решение физика: 3-да, 5-да, 7-да, 9-нет, 11-да, 13-да: предположение истинно, 9-ошибка эксперимента
Решение инженера: 3-да,5-да,7-да,9-да: предположение истинно

А если по делу,
Предлагаемое выше решение позволяет сколько угодно двоек (пар, родившихся в один день) до встречи тройки (но не троек, четверок и т.д). Мое решение основывалось на факте, что кроме одной единственной тройки, все остальные к-3 сотрудников фирмы родились в разные дни (то есть Р(364,к-3). Если допустить, что все остальные к-3 сотрудников могут праздновать свои дни рождения как им придется (то есть позволить всевозможные пары, тройки, четверки и т.п. в остальные дни, тогда коеффициент надо изменить на С(364,к-3). Так что решение и результат очень зависят от корректности формулировки.

**Cutie Pie** » 05 май 2010, 09:44

Эко продинамил всех ТС.
Бан ему Реабилитировать себя он сможет только выбором красивейшего из решений и вручением главного приза.

**Kor** » 05 май 2010, 09:49

Убежден что чудеса бывают.
Так что шанс примерно процентов 80%. Их же трое.
Если бы надо было двоих - то шансы вырастают до 95%.

**sono io** » 06 май 2010, 04:27

aaa_2, кроме этих двух строчек можно уже ничего в вашей программе не вычитывать:

for k:=1 to 10000000 do
i:=Random(365);

**aaa_2** » 06 май 2010, 08:01

sono io

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

некоторые ошибки можно найти и в ваших рассуждениях
1.

Сначала фиксируем первое число, самая первая дата. Пусть она в 1-й ячейке. Тогда еще в одной такая же дата, а в остальных - другие даты, отличные от нее. Первую дату можно выбрать 365-ю способами, место, куда ее поставить, 26-ю.
место, куда поставить такую же дату, можно выбрать 25-ю способами, то есть число размещений из 364 по 24. Но нужно учесть, что разных наборов будет в 2 раза меньше, так как будут одинаковые пары.

вот это по крайней мере не понятно... поясните подробно...
вроде это просто 365*26*25/2 т.е. 365*Спо2из26

2. если идти по вашему пути то надо также вычитать четверки, пятерки... и 26ки...
3. вы не учитываете что есть варианты с 2 тройками, с 3мя... с 8ю...
4. соответственно надо корректно учитывать варианты с 2мя 4ми... с 6ю 4ки,... с 2мя 5ми... с 5ю 5ми,... с 2мя 13...

Добавлено спустя 12 минут 41 секунду:
правильное и точное решение такое
находим количество вариантов с 8ми 3к учитываем с весом 8
находим количество вариантов с 7ми 3к учитываем с весом 7
находим количество вариантов с 6ми 3к учитываем с весом 6
...
находим количество вариантов с 1й 3ки учитываем с весом 1
сумму делим на полное количество вариантов 365^26

не желаете попробовать посчитать?

Cutie Pie писал(а):Эко продинамил всех ТС.
Бан ему Реабилитировать себя он сможет только выбором красивейшего из решений и вручением главного приза.

И сколько дней, добрая женщина, ты предлагаешь ещё ему оставить на прижизненную реабилитацию ?

**Cutie Pie** » 06 май 2010, 11:12

Добрая женщина предлагает всем расслабиться и забыть о призе, а ТС забанить. Если вдруг, спустя годы, объявится ТС и скажет "Как же йа был неправ!!!", посыпет голову пеплом, выберет победителя и даст ему ящик когнЯка с выкладкой фотодоказательств в этой ветке, то пусть это будет приятной неожиданностью для всех. А сейчас остаётся смириться с тем, что вас наебали, товарищи Я тоже смиряюсь в данный момент с тем, что меня наебали австрийцы на 15 эуро. Это жизнь...
Предчувствуя это, я даже не стала принимать участие в этой ветке в декабре прошедшего года Уж слишком смело он заявил про ящик коняки.

Cutie Pie писал(а):Добрая женщина предлагает ... ТС забанить.
... А сейчас остаётся смириться с тем, что вас наебали, товарищи

Первая часть разумна, против второй категорически возражаю.
За длинный язык товарища надо бы прихватить. Если он болен, умер или ещё что-то нехорошее ... то пожелаем здоровья, помянем и забудем. А если он пиздабол, то надо его вылечить, а именно: найти и забрать обещанный приз и выдать его победителю, которого сами и назначим.
Смириться с тем, что наебали - первый шаг к тому, что потом смириться и с тем, что въебут в глаз, засунут в жопу и т.д.

**Svante** » 06 май 2010, 11:22

айпи и мыло в студию! а судя по камчатскому отчету ТС - пацаны серьезные...

**Cutie Pie** » 06 май 2010, 12:02

Ну, наверное, если бы я тоже участвовала в этом состязании умов, то тоже хотела бы въебать ТС за пиздобольство. Дим, тут ты конечно прав.

**Navigator** » 06 май 2010, 13:31

общался с ТС с месяц назад, с декабря по март, можете мне на слово поверить, ему было совсем не до этой темы

назвать его пиздоболом у меня язык бы не повернулся, и вам не советую, ситуации в жизни бывают разные, давайте с пониманием относится к произошедшему

**Cutie Pie** » 06 май 2010, 13:43

ну хоть какая-то информация, а то мы уж совсем отчаиваться стали
Похоже, претенденты на победу дальше курят бамбук в ожидании ТС...

Navigator писал(а):общался с ТС с месяц назад, с декабря по март, можете мне на слово поверить, ему было совсем не до этой темы ... ситуации в жизни бывают разные, давайте с пониманием относится к произошедшему

Пару слов мог бы уже и написать. С пониманием отнесёмся, надо только что-то сообщить.

**sono io** » 08 май 2010, 13:24

aaa_2 писал(а):
некоторые ошибки можно найти и в ваших рассуждениях

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

🏨 Trip.com — бронирование отелей за границей и в РоссииЛучшие цены для бронирования жилья в Азии. Оплата картами МИР