|
Registriert seit: 21. Dez 2002
Ort: Lenzburg
861 Beiträge
Delphi 6 Professional
|
Re: zwei random zahlen maximal 50?
11. Feb 2004, 18:24
 irgendwie so
Delphi-Quellcode:
var
r1, r2 : Byte;
const
rng = 51;
begin
r1 := Random(rng);
r2 := Random(rng-r1);
end;
mfg Tobias
Tobias
Die Physik ist für die Physiker eigentlich viel zu schwer.
|