Losowanie liczb typu double z przedziału od 1 do 100

2013-07-09 22:13
0

Witam,

jak w temacie. Potrzebuję losować liczbę zmiennoprzecinkową pomiędzy danym zakresem w takiej postaci:

Randomize;
RandomRange(1, 100)

i chciałbym uzyskać taki efekt:
70.87; 45.50; 99.20 itp...

Mam taki kod:

numeric := StrToFloat(format('%12.2f', [RandomRange(ValueFrom, ValueTo) / RandomRange(ValueFrom, ValueTo)]));

Powyższy kod losuje mi liczby z przedziału: 0.01 - 3.99

Na przyszłość pamiętaj o doborze sensownego tematu dla wątku; Temat może mieć max. 100, więc nie trzeba oszczędzać; - furious programming 2013-07-09 22:32

Pozostało 580 znaków

2013-07-09 22:20
1

Tak na logikę:

RandomRange(1, 10000) / 100

Pozostało 580 znaków

2013-07-09 22:28
function DoubleRandomRange(const AFrom, ATo: Integer): Double;
begin
  Result := RandomRange(AFrom * 100, ATo * 100) / 100;
end;

Losuje z przedziału od 1.00 do 100.00 dla argumentów DoubleRandomRange(1, 100).


edytowany 4x, ostatnio: furious programming, 2013-07-09 22:50

Pozostało 580 znaków

2013-07-09 22:44
0

Nooo :) i gitarka o to chodziło :) Podziękował Wam pięknie.

Pozostało 580 znaków

Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0