Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Округление   Найти похожие ветки 

 
Шнур   (2004-04-29 17:39) [0]

Уважаемые мастера! Подскажите каким образом можно округлять числа только в большую сторону, например с 320 до 400


 
Sandman25+1   (2004-04-29 17:41) [1]

Добавить 50, и потом округлить к ближайшему.


 
han_malign ©   (2004-04-29 17:44) [2]

function AdjustSize(Val,BlockSize: Integer): Integer;
var ll: Integer;
begin
 Result:=Val;
 ll:=Val mod BlockSize;
 if(ll>0)then inc(Result,BlockSize-ll);
end;{AdjustSize}


 
han_malign ©   (2004-04-29 17:46) [3]

function Ceil(const X: Extended):Integer;
Call Ceil to obtain the lowest integer greater than or equal to X. The absolute value of X must be less than MaxInt.  For example:
Ceil(-2.8) = -2
Ceil(2.8) = 3
Ceil(-1.0) = -1


 
div ©   (2004-04-29 19:00) [4]

посмотри в хэлпе модуль Math и функции RoundTo и SetRoundMode. Может поможет...


 
Expre$$   (2004-04-30 10:45) [5]

Trunc ()



Страницы: 1 вся ветка

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
6-1079800088
13-th Warrior
2004-03-20 19:28
2004.05.16
Как отправить файл по сети?


1-1083213421
M@X
2004-04-29 08:37
2004.05.16
Перевод с СИ


1-1083223110
BALU1111
2004-04-29 11:18
2004.05.16
EConvertError ...


7-1081509708
Zheks
2004-04-09 15:21
2004.05.16
Как без лишних вопросов выключить комп под WinXP?


9-1073132349
Igloo
2004-01-03 15:19
2004.05.16
Вот смотрю примеры прог под ДиректХ, в делфи 5 нормально работает