Показать сообщение отдельно
Старый 18.07.2010, 17:27   #1
odd
Мастер
 
Аватар для odd
 
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений
(для 713 пользователей)
Lib_rnd - Генератор случайных чисел

Библиотека поддерживает такие функции:

seed(i: integer) - Задать начальное значение для генератора чисел
i - любое число от 0 до 4000000000.

get(i: integer) - Получить случайное число в диапазоне от 0 до i (исключительно)

get2(i: integer; k: integer) - Получить случайное число в диапазоне от i (включительно) до k (исключительно)

Пример программы:

Program RndTest;
Uses rnd;
Begin
    rnd
.seed(0);
    
DrawText('' rnd.get2(1020), 55);
    
Repaint;    
    
Delay(5000);
End
Что самое интересное, пока есть строка rnd.seed(0); программа каждый раз будет выдавать одно и то же значение. А стоит её убрать, как генератор будет выдавать разные значения при каждом запуске.
Вложения
Тип файла: zip Lib_rnd.zip (805 байт, 550 просмотров)
(Offline)
 
Ответить с цитированием
Эти 4 пользователя(ей) сказали Спасибо odd за это полезное сообщение:
Gector (31.08.2010), impersonalis (18.07.2010), psih1 (18.07.2010), Rock2roll (18.07.2010)