DIV Problem (Integer?)

[himitsu]

Wobei man auch nichtganzzahlige Divisionen bei DIV verwenden kann ... und zwar dann, wenn man die Divisor und Dividend auf ganzahlige Werte erweitert.

Delphi-Quellcode:

x := y / 1.5;  // float

x := Trunc(y / 1.5);  // integer (abgerundet)
x := Round(y / 1.5);  // integer (gerundet)

x := y * 2 div 3;  // integer (abgerundet)
x := (y * 2 + 2{*1}) div 3;  // integer (aufgerundet)
x := (y * 2 + 1{*2}) div 3;  // integer (nahezu gerundet)

*1 = 3 - 1 = Divisor - 1 = höchster Wert eines Divisionsergebnisses
*2 = 3 / 2 = Divisor / 2 = Hälfte des Divisors