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

• random\(x\)-1
• random\(x\)+1
• random\(x\+1\)
• random\(x\)