Pascal/Turbo Pascal - cadena invertida de caracteres

   
Vista:

cadena invertida de caracteres

Publicado por JUAN jcanomart@hotmail.com (11 intervenciones) el 17/06/2013 13:01:01
No doy con la clave en este programa. Necesito ayuda.

Escriba un procedimiento que reciba una cadena de caracteres y la devuelva invertida. Es decir, si recibe ‘hola’ devolverá ‘aloh’. A continuación, introduzca el procedimiento en un programa que pida al usuario una cadena, se asegure que no supera una longitud máxima definida en una constante, invoque el procedimiento anterior, y muestre por pantalla la cadena resultado.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

cadena invertida de caracteres

Publicado por ramon (2072 intervenciones) el 17/06/2013 13:24:00
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
{Mira esto te ayudara a entenderlo }
 
 program invecade;
 uses
    crt;
  var
    inve, cadena : string;
    cont : integer;
 
  procedure entrada;
  begin
      clrscr;
      write(' Entre Cadena : ');
      readln(cadena);
  end;
 
  procedure invierte(cad : string);
  var
     t : integer;
  begin
     t := 1;
     for cont := length(cad) downto 1 do
     begin
        inve[t] := cad[cont];
        inve[0] := chr(t);
        t := t + 1;
     end;
  end;
 
  begin
      entrada;
      invierte(cadena);
      clrscr;
      writeln('  Resultados ');
      writeln;
      writeln(' Cadena Entrada   = ',cadena);
      writeln(' Cadena Invertida = ',inve);
      writeln;
      writeln('   Pulse Una Tecla');
      readkey;
  end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

cadena invertida de caracteres

Publicado por JUAN (11 intervenciones) el 17/06/2013 13:26:05
Si me ha servido. Gracias Ramon
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

cadena invertida de caracteres

Publicado por Rodrigo rodrigo.uriarte@hotmail.com (1 intervención) el 31/03/2016 02:36:44
Me sirvio tu codigo pero no temino de comprender que funcion tiene la linea 25 del codigo, si bien cuando cancelo esa linea el programa no funciona correctamente. Si me puedes aclarar esa duda te agradeceria mucho.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

cadena invertida de caracteres

Publicado por alfredo (10 intervenciones) el 31/03/2016 02:49:21
Ahi almacena cuantos caracteres va a tener la cadena no?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

cadena invertida de caracteres

Publicado por ramon (2072 intervenciones) el 01/04/2016 11:10:30
Los que va tomando la cadena de lo contrario los montaría puedes hacer la prueba quita esa linea y ejecútalo veras el resultado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar