90
edits
Changes
Jump to navigation
Jump to search
/* 5 . Estime a probabilidade que dois inteiros escolhidos aleatoriamente sejam relativamente primos testando um grande números de pares de inteiros aleatoriamente selecionados. Observe o teorema que dá essa probabilidade e compare seus resultados co...
=====5 . Estime a probabilidade que dois inteiros escolhidos aleatoriamente sejam relativamente primos testando um grande números de pares de inteiros aleatoriamente selecionados. Observe o teorema que dá essa probabilidade e compare seus resultados com a probabilidade correta.=====
'''Solução'''
Para resolver esse problema, três coisas devem ser feitas.
#Crie um método para gerar pares de inteiros aleatórios.
Naturalmente, nós deixaremos a parte 3 inteiramente para o leitor.
Uma simples aproximação é usar o procedimento do Maple “rand” ''rand'' para gerar uma lista de inteiros aleatórios. Então, tendo gerado tal lista nós podemos testar a coprimalidade de seus membros em pares usando o procedimento Maple “igcd” ''igcd'' em um segundo loop. Nós implementamos esses dois loops em um novo procedimento Maple chamado “RandPairs”''RandPairs'':
'''''RandPairs := proc(list_size::integer) '''''
''''' local i, tmp, randnums, count; '''''
