Einzelnen Beitrag anzeigen

Chris1986

Registriert seit: 17. Jul 2003
Ort: Aachen
350 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: zwei random zahlen maximal 50?

  Alt 11. Feb 2004, 18:24
Müsste doch so ganz leicht gehen:

Delphi-Quellcode:
var Zahl1,
    Zahl2: integer
begin
  Zahl1 := 50 - random(51);
  Zahl2 := random(51 - Zahl1);
end;
Wenn ich keinen Denkfehler habe sind die Zahlen zusammen <= 50
MfG
Christian
Es gibt nur 10 Typen von Menschen auf der Welt:
Die, die Binärcode verstehen und die, die es nicht tun . . .
  Mit Zitat antworten Zitat