Йопт… В Delphi ещё и трабл с округлением…
если дробная часть точно равна 0.5 … — округлять в сторону ближайшего целого четного числа.
А я голову ломаю, почему при округлении 4,5 получаю 4. Придётся ещё дополнительную операцию крутить по округлению…