hallo alle zusammen,
ich habe folgendes ein problem mit der if schleife, der Ablauf funktioniert zwar aber ich möchte den code verkürzen jedoch kriege ich es nicht hin.
Meine beiden variablen : kmneu und tacho sind Double, zu der variable tacho soll ab 15km immer im 10km tack ein 0,1km dazu addiert werden
NUr ein bruch teil meines langen codes..
Code:
if kmneu>= 1005 then
begin
tacho:= kmneu + (kmneu / 100 * 10)
end
else if kmneu>= 995 then
begin
tacho:= kmneu + (1 / 10 * 100)
end
else if kmneu>= 985 then
begin
tacho:= kmneu+(1 / 10 * 99)
end
else if kmneu>= 975 then
begin
tacho:= kmneu+ (1 / 10 * 98)
end
else if kmneu>= 965 then
begin
tacho:= kmneu+ (1 / 10 * 97)
end
.
.
.
.
.
else if kmneu>= 35 then
begin
tacho:= kmneu+ (1 / 10 * 4)
end
else if kmneu>= 25 then
begin
tacho:= kmneu+ (1 / 10 * 3)
end
else if kmneu>= 15 then
begin
tacho:= kmneu+ (1 / 10 * 2)
end
else begin
tacho:= kmneu
end;