Pascal/Turbo Pascal - Contar letras

¿Como puedo hacer para leer una palabra , y decir de cuantas letras consta la palabra? Necesito validar que la palabra sea de 4 letras, pero.. como las separo, apra poder contarla?

Gracias de ante mano

No es necesario separar nada. Podrías usar la función length.

Supongamos:

var Palabra:string:

begin
readln(Palabra);
if length(palabra) = 4 then
writeln('La palabra tiene cuatro letras')
else
writeln('No tiene 4 letras);
end;

Oye, mil gracias.. no conocia esa función * Length*

Gracias nuevamente