Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.876 Beiträge
 
Delphi 10.3 Rio
 
#3

AW: Ganze Zahl immer auf nächste 50 runden?

  Alt 26. Feb 2017, 20:10
Ich verstehe das Beispiel nicht. Willst Du wirklich auf 50 runden oder doch eher auf 100?

[edit] Falls Letzteres, aus dem Hut und ungetestet:
Delphi-Quellcode:
if Zahl mod 100 < 50 then
  Zahl := Zahl div 100 * 100
else
  Zahl := Succ(Zahl div 100) * 100;
[/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen

Geändert von DeddyH (26. Feb 2017 um 20:25 Uhr)
  Mit Zitat antworten Zitat