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

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

Мастера подскажите как округлить число до второго знака [D5, Paradox]


Rustiik ©   (2003-02-17 11:53:00) 

Мастера подскажите как округлить число до второго знака


Sheriff   (2003-02-17 13:30:00) [1]

if N mod 100<51 then N:=N-N mod 100
else N:=N+100-N mod 100;


Anatoly Podgoretsky   (2003-02-17 12:12:00) [2]

N - N mod 100


Reindeer Moss Eater   (2003-02-17 12:06:00) [3]

if MyVariable > 99 then MyVariable:=99;
:)))


Rustiik   (2003-02-17 12:05:00) [4]

2passm
спасибо


MsGuns   (2003-02-17 12:04:00) [5]

strtofloat(trim(format("12.2f",[x])));
;))


passm   (2003-02-17 12:01:00) [6]

Rustiik (17.02.03 11:53)>
Round(X * 100) / 100


Наверх

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