Pascal/Turbo Pascal - Duda en Recogida de Datos

Hola es la primera vez q utilizo este foro espero q me sirva de ayuda

A lo mejor es una tonteria pero no tngo ni idea de como hacerlo

Al usuario le pido un numero con 6 digitos,es decir q es un string,pero quiero controlar que el usuario me ponga exactamente 6 digitos y sino q vulva a escribirlo.
como puedo controlarlo?? no se m ocurre nada.

Porfavor contestarme lo antes posible,gracias

Hola. Javier
Como quiero ayudarte te diré lo siguiente:
Si como dices es un STRING, entonces no es un numero (INTEGER); ambos datos son totalmente diferentes.
Tanto si es STRING como si es INTEGER no es muy complicada la solucion y se trata de muy poquitas lineas de código, lo que ocurre, y no te enfades, es que debes estudiar algo más sobre pascal.
Bien. Para lo que te pueda servir y espero te sea de utilidad.
program Digitos_de_un_numero;
uses crt;
var
CadN : string;
i : integer;

begin
clrscr;
write('Introduce numero de 6 digitos: ');
readln(cadN);
repeat
for i := 1 to length(cadN) do
while ((cadN[i] in ['0'..'9']) = false) or (length(cadN) <> 6) do
begin
write('Introduce numero de 6 digitos: ');
readln(cadN)
end
until (Length(cadN) = 6) and (CadN[i] in['0'..'9']) = true
end.
Un saludo Martin.