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

Вниз

Как округлить число?   Найти похожие ветки 

 
Rolt ©   (2003-11-02 21:03) [0]

Нужно округлить числа после
расчётов с точностью до пяти зноков
после запятой.


 
Думкин ©   (2003-11-02 21:12) [1]

RoundTo function

type TRoundToRange = -37..37;
function RoundTo(const AValue: Double; const ADigit: TRoundToRange): Double;

Expression Value

RoundTo(1234567, 3) 1234000
RoundTo(1.234, -2) 1.23
RoundTo(1.235, -2) 1.24
RoundTo(1.245, -2) 1.24

Note: The behavior of RoundTo can be affected by the Set8087CW procedure or SetRoundMode function.


 
Rolt ©   (2003-11-02 21:29) [2]

<h1>Thank</h1>


 
Dimaxx ©   (2003-11-02 23:47) [3]

RoundTo(1.245, -2) = 1.24 ?????

Вообще-то, по правилам округления если последняя цифра >=5, то к предыдущей прибавляется 1. То есть правильно RoundTo(1.245, -2) = 1.25


 
Думкин ©   (2003-11-03 05:33) [4]


> [3] Dimaxx © (02.11.03 23:47)

Эта тема уже изжевана до нельзя. Может хватит?
По каким таким правилам? Приведи их, и чтобы на них стояла БОЛЬШАЯ, КРУГЛАЯ ПЕЧАТЬ.
Кстати, если не полениться и посмотреть эту функцию, то можно заметить что там и вторая есть - если сия нге нравится - а еще и исходники никто не отменял.


 
KSergey ©   (2003-11-03 08:04) [5]

> [3] Dimaxx © (02.11.03 23:47)

http://www.delphikingdom.com/asp/section.asp?ID=16

Там есть статейка что-то на счет "Неочевидные особенно вещественых чисел"
Почитайте.



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

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

Наверх




Память: 0.47 MB
Время: 0.111 c
3-41104
3APA3A
2003-10-23 09:50
2003.11.13
Можно ли SQL запрос подставить в имя файла...


3-40912
denick
2003-10-20 10:48
2003.11.13
Мастера, помогите пожалуйста.


1-41370
SiJack
2003-10-30 16:14
2003.11.13
Плз помогите. Делаю отчет в word2000 (win98SE) все работает норма


7-42185
Speaker
2003-08-29 10:29
2003.11.13
Перенос данных в реестре


1-41596
Денис М
2003-10-27 05:13
2003.11.13
ссылка на разные типы объектов в TTreeView