Генератор использует линейный конгруэнтный метод генерации псевдослучайных чисел, аналогичный используемому в Borland C/C++.
Процедура "ИнициализацияРанд" инициализирует генератор заданным начальным значением. Функция "Ранд" генерирует псевдослучайное число.
Если обработка понравилась/пригодилась буду рад плюсу.