Pascal/Turbo Pascal - contador de interrupciones

Hola amigos^^ que tal^^, aqui les traigo una duda que no he podido resolver, quizas alguien pueda^^

la duda trata sobre el contador de interrupciones:
el seg:offset del contador de interrupciones es $0000:·$046c, pues este contador, puede ser utilizado como reloj contador^^ o al menos eso dicen, se dice que la cantidad de interrupciones es 18.2 veces un segundo.

esto es lo que tengo:

var
reloji :longint absolute $0000:$046c ;
relojw :word absolute $0000:$046c ;
relojb :byte absolute $0000:$046c ;
ini :longint ;

begin
{para calcular el tiempo en forma de ejemplo:}
readkey ;{leo una letra}
ini := reloji div 18.2 ;
repeat
writeln(ini) ;
until (reloji div 18.2) >= (ini +10) ; {para supuestos 10 segundos)
end ;

pero el problema es que no espera 10 segundos, sino que a veces mas y a veces menos, incluso he probado con los demas relojes (word y byte) y ninguno me funciona^^

espero que alguien me ayude!!! porque esto ya me saco de quisio^^, gracias y saludos^^