Hola.
Sirva este comentario para reflejar a quienes somos novatos en FreePascal, un aspecto de la función Length que me ha tenido ocupado un buen rato hasta descubrir la lógica de cálculo con la que no di hasta apercibirme de que el acento en una letra, también cuenta como carácter. Es decir, siendo el programa siguiente:
Var
Cadena : String[40];
Contador : Integer;
Begin
Cadena:='Hola, buen día.';
Contador:=Length(Cadena);
WriteLn:=('Longitud de la variable Cadena: ', Contador);
End.
Resulta que me devolvía 16. Conté a saber la de veces el contenido de Cadena y siempre me daba 15, pero claro, es que "día" no tiene tres, sino cuatro caracteres ya que "í" conforma dos: la letra y su acento.
Quede esta observación para despistados como yo. :-) :-)
Saludos cordiales.
Antonio F.S.