Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.852 Beiträge
 
Delphi 11 Alexandria
 
#15

Re: Aufrunden auf den nöchsten 5 oder 10er

  Alt 12. Okt 2007, 20:34
Zitat von Progman:
warum nehmt ihr nicht einen simplen Vergleich?
Delphi-Quellcode:
if Zahl <= 5 then Ergebnis := 5 else
 if ((Zahl >5) and (Zahl <= 10)) then Ergebnis := 10;
Da es für jedes Vielfaches gelten soll
Markus Kinzler
  Mit Zitat antworten Zitat