Einzelnen Beitrag anzeigen

Benutzerbild von Martin K
Martin K

Registriert seit: 20. Okt 2005
919 Beiträge
 
Turbo Delphi für Win32
 
#13

Re: Dividiren aber ohne nach dam Komma und auch ohne Runden

  Alt 15. Aug 2007, 15:27
Zitat von Apollo777:
Nochmal:
Delphi-Quellcode:
Zahl1:=random(4)+2;
Zahl2:=round(random(20)/Zahl1)*Zahl1;
das ist ja schon mal sehr gut.
Aber hier ist ja dann immernoch ein Problem mit der 0 !
Soll ich das dann einfach mit einer if... bedingung wiederholen, wenn quotient =0?
-> Nimm einfach den Code aus Beitrag #6 bzw. #8, da kann der Divisor erst gar nicht null werden und bei der Division kann auch kein Rest entstehen!
zur Erinnerung: Divident div Divisor = Quotient

Zitat von Apollo777:
HIHI wo ändere ich noch mal den titel bin ja grad erst hier reingestolpert?!
Editiere deinen ersten Beitrag und ändere dort den Titel
Mit den Menschen ist es wie mit Computern -
es gibt Nullen und Einsen.
  Mit Zitat antworten Zitat