Для того чтобы получить случайное число в интервале (0,х,], исползуют функцию языка Паскаль:
random(x)-1
random(x)+1
random(x+1)
random(x)