Pascal/Turbo Pascal - ordenamiento quicksort

buenas noches... o dia.
escribo en este foro de consulta con la esperanza de que algun buen samaritano me muestre como realizar un ordenamiento quicksort con pascal. se lo agradezco de antemano.

He trabajado con otros sistemas de ordenamiento pero no con este, pero te he buscado en google ya que en internet estan casi todos los sistemas de ordenamientos habidos y por haber.
Tal vez te sea de utilidad esto: (Teoria e implementacion en pascal)
http://mis-algoritmos.com/ordenamiento-rapido-quicksort
http://es.wikipedia.org/wiki/Quicksort
http://sandbox.mc.edu/~bennet/cs404/doc/qsort_pas.html