Delphi-Quellcode:
case ZaehlerNeu - ZaehlerAlt
of
1..3 : PreisJeWoche := 210;
3..MaxInt : PreisJeWoche := 0.06;
else PreisJeWoche := 0;
// oder irgendwie anders, bzw. eine Exception werfen
end;
Nur so nebenbei: Welchen Wert hat dann "PreisJeWoche" wenn "ZaehlerNeu - ZaehlerAlt" genau gleich 3 ist? 210 oder 0.06?