Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

нижняя Random граница [D4, Win95/98]


Ghost! ©   (2002-10-30 16:50:00) 

Подскажите, плиз, как обозначить нижнюю гранцу для случайного числа? Функция Random даёт обозначить только верхнюю. Конечно можно сделаьть что-то вроде

Randomize;
Repeat
a:=Random(max);
Until a>min;

Но это слишком нерационально, по крайней мере в моём часном случае - машина виснит. Не подскажите чего?


Ghost!   (2002-10-30 16:53:00) [1]

А это идея. Спасибо, Skyle.


Skyle   (2002-10-30 16:52:00) [2]

Например так ...

A := Random(Max - Min) + Min;


Наверх

Титульная страница Поиск, карта сайта Написать письмо