Oi, pessoal, um abra�o para todos! Sou novo na
lista, e estou come�ando a estudar matem�tica mais
seriamente h� algum tempo. Espero poder contribuir com
quest�es interessantes.
Aqui est� um programinha que eu fiz em Haskell, uma
linguagem "funcional", para listar n�meros primos:
***********
non_multiplos n (h:t) = if (mod h n)/=0 then
h:(non_multiplos n t)
else (non_multiplos n t)
primos_aux (h:t) = h:(primos_aux (non_multiplos h t))
primos = primos_aux [2..]
***********
"non_multiplos" elimina de uma lista todos os
multiplos de um n. "primos_aux" pega uma lista, mant�m
o primeiro n�mero e elimina os seus m�ltiplos, e
depois se aplica recursivamente ao resto da lista.
"primos" aplica "primos_aux" � lista dos n�meros
inteiros ("[2..]" � uma nota��o para
[2,3,4,5,6,7...]). N�o mexo com Prolog h� muitos anos,
mas talvez a id�ia seja �til.
Se v. estiver procurando sarna pra se co�ar, eu vi
esse site h� algum tempo:
http://www.cse.iitk.ac.in/news/primality.html
Esses caras fizeram um m�todo eficiente pra testar
se um n�mero � primo ou n�o, sem precisar ficar
dividindo n�mero por n�mero. N�o sei se � f�cil de
programar.
Abra�os,
Maur�cio
--- Murilo Rebou�as Fernandes de Lima
<[EMAIL PROTECTED]> wrote:
> sempre o quadrado perfeito de dois primos ira dar
> errado... reveja a sua
> formula. nao precisa trestar sqrt(x) e sim de 2 ate
> parte inteira de sqrt(x)
> e no caso de ser inteiro sqrt(x)-1...
>
>
> >> >DEVERIA Executar Assim:
> >> >?primo(9, 2).
> >> >no.
> >> >?primo(11, 2).
> >> >yes
> > Estes eram os resultados esperados, o que
> acontece �:
> > ?primo(3, 2).
> > yes.
> > ?primo(4, 2).
> > no.
> > ?primo(5, 2).
> > yes.
> > ?primo(6, 2).
> > no.
> > ?primo(7, 2).
> > yes
> > ?primo(8, 2).
> > no.
> > ?primo(9, 2).
> > yes.
> >
> > Parece que consegui determinar apenas se o
> n�mero �
> > �mpar ou n�o!
> >
> > O algoritmo PROLOG executa em �rvore com
> unifica��o.
> > Resumindo, de acordo com sua dedu��o de as
> > ramifica��es serem verdadeiras!
> >
> > N�o tenho o compilador instalado na minha
> m�quina aqui
> > no trabalho mas vou testar em casa e retorno
> depois!
> >
> > Obrigado!
> >
> >
> > --- Qwert Smith <[EMAIL PROTECTED]>
> escreveu:
> >
> >> >From: Dem�trius <[EMAIL PROTECTED]>
> >> >
> >> >[...]
> >> >Verificar se existe divis�o exata de X por
> todos os
> >> >n�meros maiores que 1 e menores que X. Se n�o
> >> existir
> >> >o n�mero � primo! (OK??!?!??!!!?)
> >> > (...)
__________________________________
Discover Yahoo!
Use Yahoo! to plan a weekend, have fun online and more. Check it out!
http://discover.yahoo.com/
=========================================================================
Instru��es para entrar na lista, sair da lista e usar a lista em
http://www.mat.puc-rio.br/~nicolau/olimp/obm-l.html
=========================================================================
