Vamos dar um desconto por causa do "primo".
2014-04-25 23:26 GMT-03:00 Junior Moraes <[email protected]>: > Hi. > > Se for válido usar módulos externos, dá pra implementar com o > Math::Prime::XS para ficar mais performático. :-) > > []'s > > > Em 25 de abril de 2014 23:21, Aureliano Guedes > <[email protected]>escreveu: > > Não fiz em poucas linhas, mas fis em poucos segundos: >> http://pastebin.com/DLdPwAkp >> >> ------------------------------ >> Date: Tue, 22 Apr 2014 15:09:22 -0300 >> >> From: [email protected] >> To: [email protected] >> Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo >> >> Claro que esta. Mas nao consegui fazer o que o que o Bablos sugeriu em >> uma única linha. >> >> Vinícius Miasato <[email protected]> escreveu: >> >> Opa, >> >> parabéns por aceitar o desafio e levá-lo até o fim! Não sei se o código >> funciona, mas o jogo de GOLF ainda está de pé? >> >> atenciosamente, >> Vinícius Miasato >> >> >> Em 22 de abril de 2014 13:13, Aureliano Guedes >> <[email protected]>escreveu: >> >> http://ideone.com/LjvMRz >> >> 4:30 rodando no dinossauro (AMD Athlon 1.6GHz, 2GB Ram) >> >> ------------------------------ >> Date: Thu, 17 Apr 2014 22:25:48 -0300 >> From: [email protected] >> To: [email protected] >> Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo >> >> >> Boa ideia. Vou tentar. >> >> Blabos de Blebe <[email protected]> escreveu: >> >> Que tal o menor palíndromo primo maior que time()? >> >> >> 2014-04-17 22:02 GMT-03:00 Aureliano Guedes <[email protected]>: >> >> Pode ficar menor. >> say '906609' >> >> Tiago Peczenyj <[email protected]> escreveu: >> >> sub palindromo { 906609 } >> >> >> 2014-04-17 21:45 GMT-03:00 Aureliano Guedes <[email protected]>: >> >> Ola monges, >> >> Nos últimos meses tenho visto nosso grupo um pouco parado. >> E como estamos em véspera de pascoa. >> Proponho uma brincadeira. >> Jogar golf com o Desafio do Maior Palíndromo. >> >> O desafio é simples, achar o maior número palíndromo (ou seja, quando >> lido de trás pra frente continua o mesmo) que seja resultado de uma >> multiplicação de dois números de 3 dígitos. >> >> O resultado deverá ser: 906609 >> >> Eis a minha tacada: >> >> for(my$i=100;$i<1000;$i++){for(100..999){$_[0]=$_*$i >> if(($_*$i==reverse($_*$i))&&($_*$i>=$_[0]))}}say$_[0] >> >> _______________________________________________ >> Rio-pm mailing list >> [email protected] >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://about.me/peczenyj >> >> _______________________________________________ >> Rio-pm mailing list >> [email protected] >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> _______________________________________________ Rio-pm mailing list >> [email protected] http://mail.pm.org/mailman/listinfo/rio-pm >> _______________________________________________ Rio-pm mailing list >> [email protected] http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> [email protected] >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> _______________________________________________ Rio-pm mailing list >> [email protected] http://mail.pm.org/mailman/listinfo/rio-pm >> _______________________________________________ Rio-pm mailing list >> [email protected] http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> [email protected] >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > [email protected] > http://mail.pm.org/mailman/listinfo/rio-pm >
_______________________________________________ Rio-pm mailing list [email protected] http://mail.pm.org/mailman/listinfo/rio-pm
