Друзья привет. Помогите с задачей по тв.
В шкафу находятся 10 пар ботинок разных фасонов. Случайно выбирают 4 ботинка. Найти вероятность того, что среди выбранных 4 ботинок, по крайней мере, одна пара.
Решение:
Всего способов выбрать 4 ботинка из 20:
С(4;20)= 20!/(4!*16!)= 4845
ПП (предположим противное,что в 4-х ботинках нет пар)
Выбираем только левые:
C(4;10)= 10!/(4!*6!) = 210
Т.к мы можем выбрать и правые 2 * С(4;10)
P= (2*210/4845) = 0,087
Откуда искомая вероятность равна:
P(искомая) = 1 - 0,087 = 0,913

А теперь вопрос ? Правильно ли я решил задачу? Потому что на одном из форумов наткнулся на подобную задачу и ответ получили другой.
Спасибо.

ой ой ..

Фасон у всех одинаковый

мое мнение - чисто интуитивное - неправильно!

не, ну носки я понимаю попутать правый-левый, но ботинки?

вероятность = 0.2972

Доказательство неверного решения в (0) простое:
вероятность достоверного события = 1
достоверным событием у нас есть веротяность обноружить 0 пар +1 пару+2 пары - если посчитать по (0) - получится сильно много больше 1

Бери 4 из 11 - вероятность что пара будет? Умножай на вероятность 1 из 5 (кол-во пар). Перемножай вероятности и получай вероятность обоих событий одновременно. Считать лениво))

Вероятность что не пара
(18/19)*(17/18)*(16/17)
Вероятность что среди выбранных будет хотя-бы одна пара
1-(18/19)*(17/18)*(16/17)

Вру.
(18/19)*(16/18)*(14/17)
и
1-(18/19)*(16/18)*(14/17)

0.307

И решение в текстовом виде.
Вынимаем первый ботинок, нам неважно что это за ботинок, вероятность его вынуть равна единице.
Из оставшихся 19-ти парный только один, вероятность вынуть непарный  18/19
//-// парных два из 18-ти. Непарных 16 из 18.
//-// парных три из 117-ти. Непарных 14 из 17.

Итого вероятность что среди выбранных не будет ни одной пары - (9)

Нет, парный не один .. парных 10

Ботинки делятся только на правые и левые

(12) Серьезно?
Вот ты взял один ботинок из шкафа, сколько в шкафу осталось парных ЕМУ ботинок?

Будем считать, что все ботинки одного размера. То есть если среди выбраных 4х ботинок будет левый и правый, то это уже пара

(15) Ответь на (14)

(15) Для кого в условие написано что 10 пар РАЗНЫХ ФАСОНОВ?

ДА-да но я потом написал (2) и (3)

Вероятность 0.307 правильная если считать что у них разный фасон я согласен.. а если они все одинаковые

Если бы было 10 пар одинаковых фасонов, то решение тоже эементарно
(9/19)*(8/18)*(7/17) то что все на одну ногу, и ответ
1-(9/19)*(8/18)*(7/17)

ой, в (5) посчитана вероятность именно 1ой пары.

эт я неправильно киндеру задание странслировал..

а как в текстовом виде типа (11) будет решение именно для 1 пары?

Решим другим способом.
Первый ботинок вытаскиваем любой.
Второй ботинок, той же ноги, что и первый Вероятность 9/20
Третий ботинок, той же ноги что первые два 8/20
Четвертый ботинок той же ноги что первые три 7/20

Итого, вероятность такого события 9*8*7/8000 = 63/1000

Нам же нужно найти вероятность обратного события, а значит
1-63/1000 = 937/1000

С твоим ответом не сошлось, ищи ошибку

(24) то есть по твоему - вытощить хотя бы одну пару вероятность = 0.937? - категорически не согласен!!!

(24) бЛИН стыдно то как
1 - 9*8*7/(19*18*17) = 0.913
С твоим сошлось

(26) программирование говорит, что ваш результат - неверный.

(27) Давай свою программу, найдем в ней баги, так и быть

(28) я как-то склонен больше доверять NS и своему киндеру.. ;-)

(29) Твое дело

ща опубликую программку..
.
пояснения к программе:
.
обозначим 1-ю пару ботинок как 100 и 101, вторую - 110 и 111 и т.д.
.
отобранные из чулана боты отсортируем по возрастанию, тогда если есть парные быот - разность между текущим и предыдущим = 1

прога считает медленно!
.
Перем Чулан;
Перем GlSeed;

//*******************************************
// Random(MaxValue)
//
// Параметры:
//  MaxValue - Число. Максимальное число.
//
// Возвращаемое значение:
//  Целое число из диапазона от 1 до MaxValue.
//
// Описание:
//  Возвращает целое число из диапазона от
//  единицы до значения в MaxValue.
//
function Random(MaxValue)
   // Проверим первый ли раз вызываем.
   // Если да, то проинициализируем GlSeed.
   if emptyvalue(GlSeed) = 1 then
       GlSeed = _getperformancecounter();
   endif;
   // Ну а дальше сообственно алгоритм.
   // Предложен комитетом ANSI-C.
   // Реализация на языке 1С avb

   GlSeed = GlSeed * 1103515245 + 12345;
   return ((GlSeed / 65536) % 32768) % MaxValue + 1;
endfunction

//*******************************************
//
Процедура ПоложитьБотыВчулан(КоличествоПар)
   
   Чулан = СоздатьОбъект("ТаблицаЗначений");
   Чулан.НоваяКолонка("Ботинок","Число");
   Для ы=10 по 10+КоличествоПар-1
   Цикл
       Для ыы=0 по 1
       Цикл
           Чулан.НоваяСтрока();
           Чулан.Ботинок = ы*10+ыы;
       КонецЦикла;        
   КонецЦикла;
   //Чулан.ВыбратьСтроку(,);
   
КонецПроцедуры    

//*******************************************
//
Функция СделатьВыборБот(СколькоБотВзять,КоличествоПар)
   
   ТЗ = СоздатьОбъект("ТаблицаЗначений");
   ТЗ.НоваяКолонка("Ботинок","Число");
   Для ы=1 по 4
   Цикл                  
       ыы = Random(КоличествоПар);
       Ботинок = Чулан.ПолучитьЗначение(ыы,"Ботинок");
       поз = 0;
       Пока ТЗ.НайтиЗначение(Ботинок,поз,"Ботинок") =1
       Цикл
           ыы = Random(КоличествоПар);
           Ботинок = Чулан.ПолучитьЗначение(ыы,"Ботинок");
           поз = 0;
       КонецЦикла;
       ТЗ.НоваяСтрока();
       ТЗ.Ботинок = Ботинок;
   КонецЦикла;        
   ТЗ.Сортировать("Ботинок+");
   Возврат ТЗ;
   
КонецФункции //СделатьВыборБот()


//*******************************************
//
Процедура Сформировать(кол)
   
   
   КоличествоПар = 10;    
   ПоложитьБотыВчулан(КоличествоПар);

   ТЗопыт = СоздатьОбъект("ТаблицаЗначений");
   ТЗопыт.НоваяКолонка("Результат","Число");

   Для а = 1 по 10000
   Цикл    
       ВыбранныеБоты = СделатьВыборБот(4,КоличествоПар*2);
       //ВыбранныеБоты.ВыбратьСтроку(,);
       
       ТЗопыт.НоваяСтрока();
       ТЗопыт.Результат = 0;

       ЕстьПара = 0;
       Бот = ВыбранныеБоты.ПолучитьЗначение(1,1);
       Для ы=2 по 4
       Цикл
           ЕщеБот = ВыбранныеБоты.ПолучитьЗначение(ы,1);
           Если ЕщеБот-Бот = 1
           Тогда
               ЕстьПара = ЕстьПара +1;
           КонецЕсли;
           Бот = ЕщеБот;
       КонецЦикла;    
   
       ТЗопыт.Результат =?(ЕстьПара>0,1,0);
   КонецЦикла;        
   Сообщить("вероятность = "+ТЗопыт.Итог("Результат")/ТЗопыт.КоличествоСтрок());
   
КонецПроцедуры

(0) Если выбранные ботинки не возвращаются обратно в шкаф,
то это гипергеометрическое распределение вероятностей,
которое при росте выборки к бесконечности можно апроксимировать нормальным распр., но n=4 из 20(10 пар)
явно маловато для приближения норм.распределением, поэтому,
только гипергеометрич. распределение

(30) запрограммируй и убедись...

(30) если из 10 пар - вытяниваем 4 бота и получаем 0.9, то при вытягивании 19 бот - веротяность явно зашкалит за 1....

(24) посчитай по свойе формуле вероятность хотя бы одной пары, если вытаскиваем 4 бота из 2 пар.

(34) В твоей программе решена задача для случая разных фасонов

(37) в соответсвии с (0)...

у тебя в (24) - специально не оговорено. значит - решал в соответсвии с (0) - 10 пар ботинок разнызх фасонов - результат выдал неверный.

Итого: слив для sda553 - защитан!

друзья, извините за занудство но при описанной схеме испытаний
здесь катит только гипергеометрическое распределение.
Остальное просто ээээ несостоятельно.

(41) "ты мне цифры назови!" ;-)

(40) Ну ладно, порадуйся, в честь НГ. Слил меня..

(42) http://www.aup.ru/books/m155/4_19.htm
вот, а довести "до цифры" тут ничего сложного

Вот тут малый формулу написал
n - колов пар ботинок, m - колво доставаемых
вероятность что не попадется ни однойпары
С(0,n) * C(m,n) * 2^m / C(m,2n)

Если ботинки одинаковые, то задачу можно свести к чёрным и белым шарам - в этом случае - вероятность вытащить шары разного цвета.
То есть нам нужно оценить вероятность вытягивания шаров одного цвета.
Первый шар в любом случае мы тянем с вероятностью 1.
Потом с вероятностью 9/19 мы можем вытащить шар того же цвета.
Далее тянем ещё один шар 8/18, ну и последний 7/17.
В итоге их нужно перемножить.
Ответ 1-((9/19)*(8/18)*(7/17))=1-(504/5814)=0.9133... и дофига цифр.

Первый ботинок это просто ботинок

Второй ботинок вероятность угадать 1/19

Третий ботинок вероятность угадать 2/18

Четвертый ботинок вероятность угадать 3/17

Итого: 0,34

(46) все пары разные, разного цвета

(47) неверно, правильный результат 0.307

(49) Да ты прав практическая проверка дает результат: Найдено пар:30 707

Процедура КнопкаСформироватьНажатие(Кнопка)
   // Вставить содержимое обработчика.
   ГСЧ = Новый ГенераторСлучайныхЧисел(255);
   
   НайденыхПар=0;
   Для н=1 по 100000 цикл
       СпБотинков=Новый СписокЗначений;
       СпБотинков.Очистить();
       
       Пока СпБотинков.Количество()<4 Цикл
           ТекБотинок=ГСЧ.СлучайноеЧисло(1, 20);
           Если СпБотинков.НайтиПоЗначению(ТекБотинок)=Неопределено Тогда
               СпБотинков.Добавить(ТекБотинок);
           КонецЕСли;
       КонецЦикла;
       
//        СпБотинков.ВыбратьЭлемент("хххх");
       ТЗПроверки=Новый ТаблицаЗначений;
       ТЗПроверки.Очистить();
       ТЗПроверки.Колонки.Добавить("ПарыБотинок");
       ТЗПроверки.Добавить();
       ТЗПроверки.Добавить();
       ТЗПроверки.Добавить();
       ТЗПроверки.Добавить();
       
       ТЗПроверки.ЗагрузитьКолонку(СпБотинков.ВыгрузитьЗначения(),"ПарыБотинок");
       
//        ТЗПроверки.ВыбратьСтроку();
       Для Каждого СтрТЗ из ТЗПроверки Цикл
           СтрТЗ.ПарыБотинок=Окр(СтрТЗ.ПарыБотинок/2,0,1);
       КонецЦикла;
//        ТЗПроверки.ВыбратьСтроку();
       ТЗПроверки.Свернуть("ПарыБотинок");
       
       Если ТЗПроверки.Количество()<4 Тогда
           НайденыхПар=НайденыхПар+1;
       КонецЕсли;
       
       состояние("обработано:" +н );
   КонецЦикла;
   
   Сообщить("Найдено пар:"+НайденыхПар);
КонецПроцедуры

(50) формула в 45

(51) я вот так пересчитал

1/19 + 2/18*(1-1/19)+ 3/17*(1-(1/19)-2/18*(1-1/19))

(52) возможно, выше приведено для общего случая.

(53) Что за функция C?

(54) Это самая основная функция в теории вероятностей wiki:Сочетание

(55) (45)

Написал прогу:

Функция факториал(к)
   Факториал=1;
   Если К>1 Тогда
       Для л=1 по К цикл
           Факториал=Факториал*л;
       КонецЦикла
   Конецесли;
   
   Возврат  Факториал;
Конецфункции    

Функция Сочетание(н,м)
   Если н>м Тогда
       Возврат факториал(н)/(факториал(м)*факториал(н-м))
   Иначе
       возврат 1;
   Конецесли;
КонецФункции

Функция СтепеньДвойки(й)
   Рез=1;
   Если й>0 Тогда
       Для п=1 по й Цикл
           Рез=Рез*2;
       КонецЦикла;
   Конецесли;
   
   Возврат Рез;
КонецФункции

Процедура КнопкаВыполнитьНажатие(Кнопка)
   // Вставить содержимое обработчика.
   н=20;
   м=4;
   
   Результат= (Сочетание(0,н) * Сочетание(м,н) * СтепеньДвойки(м)) / Сочетание(м,2*н);
   
   Сообщить(Результат);
КонецПроцедуры


Результат выводит: 16

Где ошибка?

н=10;
 м=4;

у меня в формуле - первый индекс - верхний.
у тебя функция Сочетание(н,м)
а вызывается Сочетание(м,н)

(58) Как рассчитать вероятность для 11 ботинок?

(59) ну.. по формуле...
11 ботинок имеется в виду - доставаемых..?

(60) да

(61) ну.. по формуле...

(62) должна быть 1 но не получается.

(63) если m > n - тогда P=1

(64) Это понятно. Вопрос про формулу.

(63) по простейшей методике рассаисанной выше - вероятность что они все разные равна нулю. Значит вероятность что есть хотя бы одна пара равна единице.

(66) По какой методике?
1. (18/19)*(16/18)*(14/17)
2. С(0,n) * C(m,n) * 2^m / C(m,2n)

(67)
1*(18/19)*(16/17)*(14/16)*(12/15)*(10/14)*(8/13)*(6/12)*(4/11)*(2/10)*(0/9)
Прямой расчет вероятности

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

(68) а в общем виде записать формулу?

(69) то есть третьий множитель и далее должен выглядеть
1*(18/19)*(16/16)*(14/15)...?

(45) Да, у меня такой же результат. Ну с учетом того что С(0,n)=1, то этот первый член можно не писать
c(m,n)*2^m/c(m,2n)
для m<n
При m=n вероятность равна 2^n/c(n,2n) что понятно, например, если у нас всего две пары, и мы вытягиваем два ботинка, то есть только 4 способа не взять ни одной пары, и 2 способа взять пары.

Я сегодня другую задачу прочитал.
Типо три двери - за одной автомобиль, за двумя другим - коза.
Человек должен выбрать одну дверь.
Потом ведущий открывает одну из дверей с козой (не ту что выбрал) и человек может выбрать - оставить свой выбор или выбрать другую дверь.
Каковы вероятности выигрыша в обоих случаях? гыгыгы. Т.е. имеет ли смысл менять выбор?

(73) Эта задача давно обсуждалась в том числе и здесь.
К сожалению, решение зависит от многих факторов - в частности - всегда ли ведущий просит сделать выбор.
Если, например, мы играем с машиной, и в неё заложено, что она нам откроет неправильную дверь всегда то получается:
1) Сначала мы выбираем дверь, то есть вероятность 1/3, что мы угадали (и 2/3, что не угадали).
2) Компьютер открывает пустую дверь (он всегда это может сделать), то получается, что с вероятностью 2/3 машина за оставшейся дверью.

Однако, если ведущий заинтересован, то есть делает такой "жест" только в том случае, если мы выбрали дверь, за которой машина, то тут получается по-другому:
1) Если мы не угадали, то там сразу показывают козу, то есть с вероятностью 2/3 мы просто идём домой.
2) Если мы угадали, то есть с вероятностью 1/3 нас просят поменять выбор - тогда его менять нельзя, так как в любом случае, мы остаёмся с козой.

(70) в общем виде?  Если вероятность ситуации p1, а вероятность события p2, то общая вероятность p1*p2

(74) резюме по задаче (пусть гений1с википиднет "парадок Монти-Холла") было такое - смена жвери ведет к повышению вероятности выигрыша.

(75) ненен.. хтитро как попытался вывернуться... - представим что пар около миллиона, и выбрать надо пордяка 10 тысяч бот... - я сомневаюсь, что формулу ты будешь записывать как выше.. ;-)

(77) через сочетания напишу.

угу, ждемс!

(73) Это ты что то как то совсем баянишь. Читай хрестоматийную ролевую игру sda553 и ReaLg в этой теме. Наглядно и на опыте продемонстрировали парадокс.
Теор. вер. и три наперстка.

(79) чего ждем?!
В данном случае произведение по всем целым i от единицы до n-1
Max(20-i*2,0)/(20-i) для задачи (0)

Ну это каким идиотом надо быть чтобы предлагать вероятность 0.307 ?
То есть вероятность вытащить 4 только правых или только левых ботинка = 0.7 ?

1Снеки...

Решение же простое - давали выше:
Первый ботинок вытаскиваем любой.
Второй ботинок, той же ноги, что и первый Вероятность 9/19
Третий ботинок, той же ноги что первые два 8/18
Четвертый ботинок той же ноги что первые три 7/17

1-(9/19)*(8/18)*(7/17)


Вот этого тупого 1Снека над озабанить за тупость:
(35) >> (30) если из 10 пар - вытяниваем 4 бота и получаем 0.9, то при вытягивании 19 бот - веротяность явно зашкалит за 1....