Откопал на просторах мисты вот такой вот код
===
Функция Ранд(Парам=0)
   Если Парам<>0 Тогда
       randomize =Парам;
   КонецЕсли;
   Если Число(randomize )=0 Тогда
       randomize =Число(СтрЗаменить(""+ТекущееВремя(),":",""));
       randomize =(16807*randomize )%2147483647;
   КонецЕсли;
   randomize =(16807*randomize )%2147483647;
   randomize =макс(randomize ,-randomize );
   Возврат(randomize /2147483647);
КонецФункции

Процедура Сформировать(Кол)
   Сообщить(Ранд());
КонецПроцедуры
===

Код абсолютно рабочий. Одна проблемка - НИ ФИГА я в нем не понял!!!
Подскажите, пожалуйста, что и куда мне нужно добавить (или где, что и на что исправить), чтобы он мне генерировал или (выдавал) целые числа от 1 до 9 включително? А то пока дробные числа выдает.

(0)
СлучайноеОт1До9 = Цел(Ранд()*10)+1;

Цел(Ранд()*8)+1

(2) Да, так гораздо правильнее.

не, Окр(Ранд()*8,0)+1

Спасибо! Получилось! :-)

(0)Случайное число, основанное на временном интервале :)

(6) Пофиг! Главное - работает! :-) Ну, прямо, как про того таксиста из анекдота - "Вам шашечки или ехать?" :-)

RiK_SQL.dll

(6) Вызови первый раз с параметром - и будет счастье.

System.Random Next

(6) генератор _псевдо_случайных чисел. генератора истинно случайных чисел пока не видел

(11) а я видел... Шкаф в 2 меня...

(11) Есть такие. Но - аппаратные.

Истинно случайных чисел не существует - это абстракция

(0) Этого хватит?
Функция random(Длина=2)
   СлучайноеЧисло=((_getPerformanceCounter()*1103515245+12345)%2147483648)/2147483648;
   Возврат Цел(СлучайноеЧисло*Лев("100000000000000000000",Длина+1));
КонецФункции //random

(0) :) 1275

//_____________________________________________________________________________
function random(n) export
randSeed = _getPerformanceCounter() * 1103515245 + 12345;
return ((randSeed / 65536) % 32768) % n+1;
endFunction

(16) незачёт. bound error

(12) в реале?

Генератор случайных чисел - это радиолампа белого шума с включённым на выход АЦП - небольшое устройство, используемое при генерации исходных данных для ключей в шифровании.

Как варианта

Функция глСлучайноеЧисло(Знач Предел=1) Экспорт
   СЛЧ=СоздатьОбъект("rcbdyctl.setting");
   СлучайноеЧисло=0;
   Коэф=1;
   СтрСл=СЛЧ.CreatePassword;
   Для сч2=1 По СтрДлина(СтрСл) Цикл
       ССимв=Сред(СтрСл,сч2,1);
       КСимв=КодСимв(ССимв);
       ПослЦыфра=КСимв-(Цел(КСимв/10)*10);
       Коэф=Коэф/10;
       СлучайноеЧисло=СлучайноеЧисло+ПослЦыфра*Коэф;
   КонецЦикла;
   Если Предел>1 Тогда
       СлучайноеЧисло=1+Цел(СлучайноеЧисло*Цел(Предел));
   КонецЕсли;
   Возврат СлучайноеЧисло;
КонецФункции