Pascal/Turbo Pascal - numeros enteros

como se hace para realizar un programa en pascal en donde se introduzca un numero entero cualquiera y seguidamente aparezca el total de sus digitos correspondiente a esa cantidad?

Hola Katy.
Puedes tratar el número como simple texto.
La función Length devuelve la cantidad de caracteres que tiene una cadena.

Uses Crt;
Var Numero: String;
Begin
ClrScr;
WriteLn('Introduzca un numero');
ReadLn(Numero);
WriteLn('La cantidad de digitos es: ', Length(Numero));
Readkey
end.