![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Генерация чисел [D7, XP]
Саня © (2008-11-06 12:51:00)Привет!!! Подскажите как мне сгенерировать случайные дробные числа?
RandSeed:=random(10);вот так только целые получаются
Правильный$Вася (2008-11-06 13:20:00) [1]кстати, а случайные по какому закону распределения тебе надо?
Vlad Oshin (2008-11-06 13:14:00) [2]
> на 15
на *Pi и /е :)
Ega23 (2008-11-06 13:09:00) [3]
var
RandArr : array[1..1000000] of Double;
i : Integer;
begin
for i:=1 to 1000000 do
RandArr[i] := random*1000;
end;
Правильный$Вася (2008-11-06 13:09:00) [4]
> RandSeed:=random(10); вот так только целые получаются
гы, если уж так тянет из целых дробные, подели результат на 15
Сергей М. (2008-11-06 12:57:00) [5]А справку по Random ты внимательно проштудировал ?
clickmaker (2008-11-06 12:54:00) [6]F1
function Random [ ( Range: Integer) ];
Description
In Delphi code, Random returns a random number within the range 0 <= X < Range. If Range is not specified, the result is a real-type random numberwithin the range
0 <= X < 1.