Pascal/Turbo Pascal - AYUDA URGENTE!!!

Miren por hay lo que le prgunto sea una pavada pero tengo el siguiente problema...dado un numero ingresado por teclado (numero de 8 digitos) tengo que extraer la cifra mas significativa y analizarla...bueno quisiera saber como hago para extraerla (teniendo en cuenta que no se usar cadenas)...si existe alguna manera por favor comuniquenmela..y otra duda que tego es basicamente la misma como hago para extraer cada digito de un numero X (teniendo en cuenta que no se manejar cadenas) para asi poder analizarlas... bueno de antemano le agradezco la ayuda...

Bueno, a mi parecer hay dos maneras de hacer esto.

Una es leer directamente una cadena por teclado, en vez de leer un número.
Sería:

var Cadena:string;

write('Ingrese número:');
readln(Cadena);

El último dígito es Cadena[1], que devuelve un valor de tipo char.

Explicación:

Una cadena es como un arreglo de tipo char. Así, las posiciones van desde 1 hasta n. N es la longitud máxima, que te la da la función length(Cadena). ¿Se entiende?

Así, si uno quiere acceder a la última letra puede hacer Cadena[length(Cadena)].

Espero te sirva, saludos.