lo ce, lo ce he estado preguntando mucho pero esque estoy muy oxidado en pascal y como no lo uso mucho :/...
y ahurita tengo un proyecto que estoy haciendo, entonces mi problema es el siguiente:

procedure EstadoT2;
//Pendiente: Hexadecimal a Entero
var
  c : char;
  Numero: integer;
begin
{$ifdef DEBUG}
  writeln(stderr,'Estado T2');
{$endif}
  Avanzar;
  c := Leer;
 [glow=green,2,300] while c in ['a'..'f'] or ['0'..'7'] or ['A'..'F'] do
  begin
    S := S + c;
    Avanzar;
    c := Leer;
  end;[/glow]
 Numero:=  HextoInt(S);
 
 
  writeln('Token ID reconocido: ', S);
end;

Nota: HextoInt ya lo tengo declarado como una funcion , mi problema es en el while
quiero hacer esa condicion y no me funciona
alguien podria ayudarme porfavor ¿?

todavía se usa pascal? 

Se programa mucho en pascal, muchos antivirus tienen modulos hechos totálmente en pascal, por ejemplo Kaspersky.

El desuso de pascal no es culpa de su potencial que tiene mucho, es culpa de que cada vez se orienta mas todo a la programación en C y sus "derivados" como java y similares, esto se debe al avance de aplicaciónes que usan este lenguaje y derivados como són las aplicaciónes para telefonía entre otras.