Thema: Delphi randomzahlen aufaddieren

Einzelnen Beitrag anzeigen

gekmihesg
(Gast)

n/a Beiträge
 
#5

Re: randomzahlen aufaddieren

  Alt 17. Jan 2004, 20:56
Delphi-Quellcode:
i:=random(5)+1;
if i = 1 then
  zahl:=0
else
  zahl:=zahl+i;
...wenn ich das richtig verstanden habe
  Mit Zitat antworten Zitat