==='''6. Computações e explorações'''===
=====1. Dado um inteiro positivo “n”''n'', encontre a probabilidade de selecionar seis inteiros do conjunto {<math>1, \cdots , n</math>} que foram mecânicamente mecanicamente selecionados em uma loteria. =====
Solução
Nós seguiremos o exemplo 4 no texto. O número total de maneiras de escolher 6 números de “n” '''n''' números é <math>C(n, 6)</math>, que pode ser encontrado com o procedimento “numbcomb” ''numbcomb'' no pacote “combinat”''combinat''. Isso nos dá o número total de possibilidades, onde apenas uma irá vencer.
'''''Lottery := proc(n::posint) '''''
'''''local total; '''''
'''''Lottery2(49,6); '''''
'''''Lottery(30,3); '''''
=====2. Dados inteiros positivos “n” e “r”, liste todas as r-combinações, com repetições permitidas, do conjunto .=====
Solução