Pascal/Turbo Pascal - necesito una tabla hash (pascal)

por favor necesito ke me ayuden...
necsito un codigo fuente de una tabla hash para pascal
al que lo hiciere se lo agradeceria mucho
[email protected]

Holas, hay varias maneras de implementar una funcion Hash, como por ejemplo por desplazamiento de bits, pero llegado al caso creo que podes hacer una utilizando el operador mod. Ejemplo, si tenes una tabla Hash de 0 a 500 lugares pues haces f(x) mod 501, y te aseguras que ese valor no va a exceder de 500. Es mas, si vieras la funcion que genera numeros aleatorios, o sea Random te vas a cagar de risa, pues utiliza mod. Esta bien saquemos los inmensos numeros primos que utiliza y el gran periodo que tiene, pero a la larga la secuencia se repite, a la muyyyyy larga :P.