Bueno
Doddy, creo que ha hecho la más corta, por lógica
La mía es esta, trabajando con
arrays:
Using perl Syntax Highlighting
$_ = "arenera";
@c = split (//);
for ($f = $#c,$i = 0 ; $c[$i] eq $c[$f] && $f >= 0; $i++,$f--){}
($#c + 1) == $i ? print "Palindroma" : print "NO palindroma";
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
¡¡Lo bueno de estos retos es que siempre aprendes algo nuevo!!
P.D.: Lo suyo sería que el que hiciera la forma más óptima propusiera un nuevo reto/ejercicio
Voy a llegar hasta el final, voy a subir la velocidad - Migue Benítez.