Dividieren but ohne Zahlen nach dam Komma und ohne Runden ?!

[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?

[Apollo777]

HIHI wo ändere ich noch mal den titel bin ja grad erst hier reingestolpert?!

[Martin K]

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