"Fehlerhafte" bei Prozentrechnung auf 100%

[Stevie]

Bei 5 wird in dem Fall nunmal aufgerundet (siehe Mathematisches Runden).

Wenn ich das richtig verstanden habe, willst du immer abrunden.
Das sollte gehen, indem du vor dem FloatToStrF das hier machst:

zahl3 := Trunc(zahl3 * 10) / 10;