Cadena invertida...

Tengo que ingresar una cadena de caracteres en un caja de texto y mostrar la cadena invertida en otra caja de texto, agradecería ayuda el respecto, gracias adelantadas

1 Respuesta

Respuesta
1
Una solución podría ser:
FUNCTION Invierte( m.cCadena )
LOCAL m.cRegresa, m.nContador, m.nTamaño
m.cRegresa = ""
FOR m.nContador = LEN( m.cCadena ) to 1 step -1
m.cRegresa = m.cRegresa + substr( m.cCadena, m.nContador, 1 )
NEXT
RETURN m.cRegresa
Bueno, eso digo yo...
¿Te funcionó el código o es necesario hacerle alguna corrección?

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas