Как округлить число в наименьшую сторону? Опции

[Дядя_Вася]

Сабж.

[TarasBer]

Этот транк почему-то неправильно ведёт себя на отрицательных числах. trunc(-1.5) с точки зрения стандартной процедуры равен -1, но с точки зрения математики он должен быть равен минус двум.
Когда мне надо было брать настоящую целую часть, я делал примерно так:
t := round(x);
if t > x then t := t - 1;

Сообщение отредактировано: TarasBer - 4.05.2010 17:50