Сколько билетов спортлото (5 из 36 или 6 из 49) необходимо приобрести, чтобы получить максимальный выигрыш - PascalABC.NET

[Andrit]

Сколько билетов спортлото (5 из 36 или 6 из 49) необходимо приобрести, чтобы получить максимальный выигрыш со 100% вероятностью? Примечание: определите функцию, которая вычисляет число сообщений(С_n^m=n!/m!(n-n)!, где n! = 1 ∙ 2 ∙ 3 ​​∙ ... ∙ n - факториал числа n)

[Аватар]

Вообще-то число сочетаний и из 36 по 5 оно равно 36!/(5!*(36-5)!)

В числителе посчитай 32*33*34*35*36, в знаменатели 5! и раздели

[Serge_Bliznykov]

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

С_n^m=n!/m!(n-n)!

Вы неверно формулу написали (с явной ошибкой - n-n - неверно).

Сообщение от Аватар

В числителе посчитай 32*33*34*35*36, в знаменатели 5! и раздели

Вы хотите сказать, что для того, чтобы "получить максимальный выигрыш со 100% вероятностью" нужно купить билетов количеством равным числу всех сочетаний?! o_O

_

[Аватар]

А что нет? Так и есть, зато гарантировано 100% )) И 5 угаданных, и все возможные 4 и какие еще там есть

[Serge_Bliznykov]

Сообщение от Аватар

А что нет? Так и есть, зато гарантировано 100% ))

это, конечно, так.
но я боюсь, что столько билетов просто напечатать невозможно
или они электронные?

[Аватар]

376992 для 5 из 36. Не так уж и много, напечатают если такие игроки найдутся. Ток гораздо больше на билеты потратишь, чем выиграешь )) Да и заполнять проблемно, бригаду нужно нанимать. Для 6 из 49 побольше, но принцип тот же

[Andrit]

Помогите с программой

[Аватар]

Count:=((((32*33*34*35*36) div 5 ) div 4) div 3) div 2;

Или так

Count:=1;
for i:=m-n+1 to m do Count:=Count*i;
for i:=2 to n do Count:=Count div i;