Contar caracteres en strings de pascal

[juancho77]

Alguien sabe si existe alguna forma para hacer eso en pascal (NO delphi)?
Algo directo, alguna funcion de alguna unit o algo. Ya se como hacerlo por proc.

Me refiero a, por ejemplo:

numerodeletras:= funcionquecuentaletras(string); donde string es una palabra.

Si string='casa' debe devolver 4.

gracias

[d(-_-)b]

Bueno, yo no uso Pascal y nunca lo eh usado, en pascal creo que seria lo mismo que en Delphi, no se, pero en modo consola se puede hacer asi.

Código (delphi) [Seleccionar] Expandir

program ContarCadenas;

{$APPTYPE CONSOLE}

uses
  SysUtils;

//funcion que cuenta los numeros de caracteres de la cadena
function ContarCaracteresCadenas: String;
var
Contar: String;
begin
Contar := 'Numeros de caracteres';
WriteLn ('Los caracteres contados son: ', Length (Contar));
ReadLn;
end;

//iniciamos el programa y llamamos a la funcion
begin
  ContarCaracteresCadenas;
end.

no se, espero que te sirva.

saludos...

[cassiani]

StrLen de strings

Código (pascal) [Seleccionar] Expandir

uses strings,crt;
const cadena : PChar= 'casa';
begin
     clrscr;
     Writeln ('La cadena tiene: ',StrLen(cadena),' caracteres');
     readln;
end.

[GroK]

Bueno, con length tambien servia, y no hay necesidad de llamar a una unit extra:

Código (pascal) [Seleccionar] Expandir

program bla;

var palabra : string;

begin
   write ('introduce palabra: ');
   readln (palabra);
   writeln (length (palabra));
end.

Saludos

[Lauta]

Los strings en Pascal (según me explicaron este cuatrimestre en la facu XD) tienen en su primer posición (string[0]) la longitud de la cadena, obviamente en formato char, basta con validar ese valor y listo.

[kamsky]

Los strings en Pascal (según me explicaron este cuatrimestre en la facu XD) tienen en su primer posición (string[0]) la longitud de la cadena, obviamente en formato char, basta con validar ese valor y listo.

el primer caracter de un String,se guarda en la posición 0 del array:

|  P  |  E  |  P  |  E  |

  0      1      2     3

[Mayhem]

Con la funcion length() tienes la cantidad de caracteres de un string, le pasas el string como parámetro y devuelve un int con la cantidad de caracteres...
Espero que te sirva...


  Saludos!!

[~~]

Los strings en Pascal (según me explicaron este cuatrimestre en la facu XD) tienen en su primer posición (string[0]) la longitud de la cadena, obviamente en formato char, basta con validar ese valor y listo.

el primer caracter de un String,se guarda en la posición 0 del array:

|  P  |  E  |  P  |  E  |

  0      1      2     3

Eso es normalmente lo que se suele hacer, pero en pascal efectivamente un string tiene en su primera posición el número de caracteres que contiene y luego la palabra que quieras guardar, nunca me a dado por comprobarlo, pero me fío de mi profesor de universidad xDD

[juancho77]

gracias a todos. anduvo con length 

[Lauta]

Los strings en Pascal (según me explicaron este cuatrimestre en la facu XD) tienen en su primer posición (string[0]) la longitud de la cadena, obviamente en formato char, basta con validar ese valor y listo.

el primer caracter de un String,se guarda en la posición 0 del array:

|  P  |  E  |  P  |  E  |

  0      1      2     3

Eso es normalmente lo que se suele hacer, pero en pascal efectivamente un string tiene en su primera posición el número de caracteres que contiene y luego la palabra que quieras guardar, nunca me a dado por comprobarlo, pero me fío de mi profesor de universidad xDD

Yo lo quise comprobar, después de la respuesta de kamsky y cuando imprimía la posición 0 del string, no me aparecía, ni la longitud, ni la primer letra del string, sino un símbolo extraño... A veces un rombo, según la cadena que ingresaba cambiaba...