Плюсовая округлялка

← →
WhiteGuy © (2005-01-13 13:38) [0]

Здорово, ребята!!
Как округлить число в плюсовую сторону?
Т.е. 1,1 = 2, 3,0001=4
Подскажите!

← →
TUser © (2005-01-13 13:43) [1]

SetRoundingMode(rmUp);
result:=round(i);

← →
wicked © (2005-01-13 13:44) [2]

навскидку - добавлять 0,4999(9) и округлять, как обычно...
могу быть и не прав...

← →
WhiteGuy © (2005-01-13 13:44) [3]

2ТЮзверь
Спасиб, мэн!

← →
MBo © (2005-01-13 13:44) [4]

Надо полагать, хоть какая-то "округлялка" тебе известна.
Зайди в хелп по ней, перейди в раздел Category arithmetic routines, и покопайся там

← →
MacroDenS © (2005-01-13 13:48) [5]

Берешь то что некруглое, и обрабатываешь напильником до степени круглости, если нужно с плюсовым эффектом - тогда сначала нарашиваешь предмет до состояния +, а потом напильником....

← →
Stefan (2005-01-13 13:52) [6]

Result := inc(int(i));

← →
WhiteGuy © (2005-01-13 13:57) [7]

2MacroDenS
Базаришь вещи, чувак! :)

← →
MacroDenS © (2005-01-13 13:58) [8]

[7]
ёу чувак

← →
TUser © (2005-01-13 14:16) [9]

> Result := inc(int(i));

Result(3) = 4

← →
Anatoly Podgoretsky © (2005-01-13 14:51) [10]

Ceil

← →
WhiteGuy © (2005-01-14 12:22) [11]

2 TUser [1]
А функции SetRoundingMode нету!

← →
begin...end © (2005-01-14 12:27) [12]

> [11] WhiteGuy © (14.01.05 12:22)

SetRoundMode

2 begin...end
SetRoundMode(rmUp)???
Щас просто под рукой Делфи нету!

> А функции SetRoundingMode нету!
Ой, звиняй. F1 лениво жать было :)

Всё равно, извините за ламерство :-), компилятор пишет, что чёто там не продекларировано... 8D

2 begin...end [17]
Oki, попробуем!

Плюсовая округлялка Найти похожие ветки