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

Вниз

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

 
Toma2   (2002-07-20 14:27) [0]

Вопрос конечно же простой, но я что-то затрудняюсь.
Как округлить число до второго знака после запятой


 
BOPOH ©   (2002-07-20 17:03) [1]

Умнож на 100, округли до целого, раздели на 100 :)))))))))


 
Viewer   (2002-07-20 17:52) [2]

На самом деле это неверный подход.
Хранить данные надо с максимальной точностью, определенной точностью предоставления данных, а вот отображать..
Т.е. это вопрос отображения.
Отсюда и исходи.
Всевозможные варианты Format... и пр


 
Феликс ©   (2002-07-20 18:09) [3]

Val
Смотри в helpe.


 
Феликс ©   (2002-07-20 18:21) [4]

Пардон это подстава. Нужен str.
str(x1:7:3,s1);
x1:real;
s1:string;


 
Феликс ©   (2002-07-20 18:25) [5]

Т.е x1 это тове число с запятыми, а s1 "обрезанный" результат.


 
Слесарь-технолог   (2002-07-21 00:42) [6]

// Вх.: value, Вых.: value (float)

int s = value*100 + 0.5;
value = ((float)s)/100.0;


 
Mozart.mc   (2002-07-21 01:47) [7]

StrToFloat(FloatToStrF(23.34534545,ffGeneral,4,2))=23.35
К примеру...


 
Ich Hasse ©   (2002-07-21 12:41) [8]

procedure Rounding(Chislo:Extended;Count: integer);
begin
Chislo:=Trunc(Chislo/power(10,Count))/power(10,count);
end;

вроде так, только с ф-цией возведения в степеньь мог ошибиться (power(...)).


 
TM   (2002-07-23 21:11) [9]

В Delphi-6 точно, возможно и в 5-м есть такая функция: RoundTo(Real, Integer). Округление до 2-го знака после запятой: RoundTo(Z,-2);


 
msk ©   (2002-07-24 12:33) [10]

s:=Format("%8.2f",245.124);
получится s=245.12



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

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

Наверх




Память: 0.48 MB
Время: 0.011 c
1-13642
J_S
2002-07-23 11:23
2002.08.05
WINRAR ZIP


7-13836
Nubie
2002-05-21 02:56
2002.08.05
???Как запустить программу???


14-13779
RuslanJ
2002-07-10 14:13
2002.08.05
Добавить страничку в многостраничном блокноте


1-13602
newUser
2002-07-24 17:17
2002.08.05
WinXP


7-13833
chuchi
2002-05-23 05:40
2002.08.05
Как получить содержимое документа из очереди печати?