Función lenght longitud en pascal

La función Lenght proporciona la longitud lógica de una cadena de caracteres y devuelve un valor entero.

Formato:

Length (s)

 

s  expresión tipo cadena
Ejemplo:
Var 
 cad : string[20];
begin cad:='Hola';
  WriteLn(Length ('Hola como estas'));
  {devuelve el valor 15} WriteLn(Length (''));
  {devuelve cero (cadena vacía)} WriteLn(Length (cad));
  {devuelve el valor 4}  WriteLn(Ord(cad[0])) 
  {devuelve el valor 4}end.