Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Matze**

Code:

			var Ergebnis: integer;

    Y,Z: real;

Y := Random(1000) +1; 

Z := Random(1000) +1; 

Ergebnis:=round(Y/Z);

Gruß Matze

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#9 Re: Division 24. Aug 2003, 11:00 markieren Code: var Ergebnis: integer; Y,Z: real; Y := Random(1000) +1; Z := Random(1000) +1; Ergebnis:=round(Y/Z); Gruß Matze
	Zitat