Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Округление


Di_wind ©   (2002-02-09 14:34:00) 

Люди как число 1,2568975 округлить до 3-х знаков после запятой?


drpass   (2002-02-10 17:08:00) [1]

Вообще-то программисты Delphi используют функцию RoundTo:
x:=RoundTo(1.2568975, -3);


Dimk   (2002-02-10 01:19:00) [2]

Даааа! Мне последняя формула очень понравилась! :0)


Di_wind   (2002-02-09 16:04:00) [3]

благодарю.


DMN   (2002-02-09 15:56:00) [4]

round(1.2568975*1000)/1000

Для произвольного X и числа знаков N:

round(x*exp(n*ln(10)))/exp(n*ln(10));


Наверх

Титульная страница Поиск, карта сайта Написать письмо