Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Вниз

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

 
Marat ©   (2007-04-26 15:05) [0]

Мне необходимо округлить число 8,1563 до 8,16.
А если попадется вот такое- 12,8435, то до 12,84.
То есть если третья после запятой больше или равно пяти, то +1, а если меньше то без изменений.


 
Сергей М. ©   (2007-04-26 15:09) [1]

Удалено модератором


 
Marat ©   (2007-04-26 15:10) [2]

я просто хочу узнать можно ли такое осуществить не "разбирая" число по составным


 
zdm ©   (2007-04-26 15:10) [3]

RoundTo() ведет к бухгалтерскому округлению, а если хочешь арефмитическое, то  в твоем случае, примерно так
commiss:=TRUNC(price/100*pr_val *100+0.5)/100;


 
zdm ©   (2007-04-26 15:15) [4]

TRUNC(8.1563 *100+0.5)/100=8.16
TRUNC(12.8435 *100+0.5)/100=12.84 соответственно если нужно до 3 цифр, то и умножаешь/делишь на 1000 , а прибовляешь 0.05 и т.д.


 
McSimm_ ©   (2007-04-26 15:16) [5]

Иногда проще сразу воспользоваться функциями форматирования строк.


 
Marat ©   (2007-04-26 15:17) [6]

Спасибо.


 
stakan ©   (2007-04-26 15:23) [7]

SimpleRoundTo



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

Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.051 c
2-1178265430
Abcdef123
2007-05-04 11:57
2007.05.20
Есть ли в Делфи функция, которая...


2-1177699162
Ezorcist
2007-04-27 22:39
2007.05.20
Многопоточность в Tserversocket


1-1174910548
sapsi
2007-03-26 16:02
2007.05.20
Изменить свойства шрифта у части текста


15-1177393553
AirLarson
2007-04-24 09:45
2007.05.20
Где можно преобрести Advantech и Cisco


1-1174579137
DelphiLexx
2007-03-22 18:58
2007.05.20
Рассылка сообщений дочерним окнам





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский