Pascal/Turbo Pascal - Quiero hacer cumbia con pascal

Tengo unos cuantos problemas 1como hago para que una variable
integer := random;
2 como hago cumbias con la tarjeta de sonido

Como asignar un random a un entero??

var i:integer;

begin
i:=random(10); {el numero que quieras, en este
caso tomara un numero del 0 al
10}
readkey;
end.

en caso de q no uses turbo pascal sino pascal estandar, este funcion te da un nomero pseudoaleatorio...

function random(var semilla:integer):real;
const A=65536;B=25173;c=13849
{variando estas constantes varias el los limites en los q se mueve el nº}
BEGIN
semilla:=(B*semilla+C) mod A;
ramdom:=semilla/A;
END;

esperoo q te sirva