Losowe liczby w zakresie

Question

To jest w Delphi (dokładnie 7). Jak mogę generować liczby losowe w określonym zakresie? Podobny do random.randint(1,6) w Pythonie. Próbuję symulować rzucanie kostkami. Druga opcja to jakoś wyłączyć 0.

Obecnie mam:

Randomize; 
Roll := Random(7); 
Label3.Caption := IntToStr(Roll); 

Answer 1

Można użyć

RandomRange(1, 7) 

który zwróci losową liczbę całkowitą ze zbioru {1, 2, 3, 4, 5, 6}.

(uses Math)

[Nawiasem mówiąc, jest to trywialne 'jakoś' wykluczyć zero. Właśnie do Random(6) + 1]

Answer 2

Ponadto, możliwe jest wytworzenie się wartość z zakresu pływaka [a, b), b najtańsza.

r := random; 
x := (b-a)*r + a; 

Pierwsza linia generuje wartość od [0; 1) interwał; drugi daje wartość z [a, b).

Jeśli chcesz uzyskać N losowych wartości w przedziale [a; b] (na przykład, 5 przypadkowe wartości z przedziału [1, 2] {1, 1,25, 1,5, 1,75, 2}) jest następująca:

r := RandomRange(0, N-1); 
x := a + r*(b-a)/(N-1); 

Answer 3

do określonej wartości można użyć

randomize; 
ran:=random(6)+1; 

ta wartość będzie losowa od 1 do 6