Встроенной функции нету. Вот с использование внешнего объекта MSScriptControl.ScriptControl (есть во всех Windows, начиная с 2000):
//******************************************************************************
// СлучайноеЧисло(Знач Предел=1)
//
// Параметры:
// Знач Предел=1
//
// Возвращаемое значение:
// Случайное число в диапазоне:
// 0~1, если Предел равен 1;
// 1~Предел если Предел больше 1
//
Функция СлучайноеЧисло(Знач Предел=1)
ScrCtrl=CreateObject("MSScriptControl.ScriptControl");
ScrCtrl.Language="VBscript";
ScrCtrl.ExecuteStatement("randomize");
СлучайноеЧисло=ScrCtrl.Eval("rnd");
Если Предел>1 Тогда
СлучайноеЧисло=1+Цел(СлучайноеЧисло*Цел(Предел));
КонецЕсли;
Возврат СлучайноеЧисло;
КонецФункции // СлучайноеЧисло()
