Как получить случайное Integer и Single ?

← →
randomizer (2007-02-04 04:45) [0]

Не от 0 до 1, и не в диапазоне. А просто случайное Integer и Single.
Есть такие фукнции?

← →
tesseract © (2007-02-04 05:41) [1]

Random(диапазон) - из простых. Они имеют парвномерное распределение. А так - изучать теорию, агоритмы генерации случайных чисел не из простых.

← →
randomizer (2007-02-04 05:50) [2]

> tesseract © (04.02.07 05:41) [1]
> Random(диапазон) - из простых.

То есть ты тоже не знаешь диапазона?

← →
TUser © (2007-02-04 06:35) [3]

для Integer: Random (MaxInt) * (Random (1) * 2 - 1)

зы. ноль будет получаться в два раза чаще других чисел

← →
randomizer (2007-02-04 06:41) [4]

В том то и дело. Кроме того иногда будет возникать ошибка.

← →
TUser © (2007-02-04 06:51) [5]

> Кроме того иногда будет возникать ошибка.

Что за ошибка?

Ну, если заняться нечем, то
var i, r: integer;
begin
r := 0;
for i := 0 to sizeof (r) * 8 - 1 do
r := r or (Random (1) shl i);
{r - искомое число}
...
end;

← →
randomizer (2007-02-04 06:57) [6]

Одно число не будет появляться никогда. Такая ошибка.

round((random*2 - 1)*2*MaxInt)

Надо только помнить, что диапазон у random - [0,1) Но можно и тут - изменить смещение и масштаб. Считать лень.

А для Single - диапазон описан константами в Math.

Random (2) и рандом целочисленный использовать. Будет [0;2).

Как получить случайное Integer и Single ? Найти похожие ветки