Вниз
Скачать: CL | DM;

ОКРУГЛЕНИЕ   Найти похожие ветки 

 
zaw   (2005-06-03 14:12) [0]

Почему функция RoundTo не округляет число 275.975 правильно
var
Double1, double2, double3, double4: double;
begin
Double1 := 3.5;
Double2 := 78.85;
Double2 := 78.89;

Double3 := RoundTo(Double1 * Double2, -2); // 275.97
Double4 := RoundTo(Double1 * Double2, -2); // 276.12

Label1.Caption := FloatToStr(Double3);
Label2.Caption := FloatToStr(Double4);  
end;


 
Anatoly Podgoretsky ©   (2005-06-03 14:30) [1]

По тому что ни о каком округлении для чисел с плавающей запятой говорить не приходится.
Округление это вообще тогда когда число круглое, никаких знаков после запятой.
Здесь же делается некоторый психологический обман, число умножается на 10^N, затем округляется, после опять делится на туже величину, после чего мы имеем опять не округленое число, при этом никто не гарантирует, что оно будет равно N / 10^N


 
panov ©   (2005-06-03 14:35) [2]

>zaw   (03.06.05 14:12)
И не надо так орать.


 
zaw   (2005-06-03 14:37) [3]

как выйти из ситуации?


 
Ega23 ©   (2005-06-03 14:38) [4]

как выйти из ситуации?

С позором. Или с честью.  На твой выбор.


 
zaw   (2005-06-03 14:51) [5]


> Ega23 ©   (03.06.05 14:38) [4]

Вышел с честью, вместо double надо было использовать extended


 
Anatoly Podgoretsky ©   (2005-06-03 15:32) [6]

Никуда ты не вышел, ты просто отодвинул границу.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
3-1116145372
_e_u_
2005-05-15 12:22
2005.06.29
пропал текст из ДБгрида


14-1115242958
i-s-v
2005-05-05 01:42
2005.06.29
SMS


4-1115538019
Makhanev A.S.
2005-05-08 11:40
2005.06.29
Как запретить смену системного времени в Windows?


6-1112244842
X-Disa
2005-03-31 08:54
2005.06.29
Процесс загрузки в TIdHttp.Get?


1-1117605664
mmms
2005-06-01 10:01
2005.06.29
Помогите разобрать строку, нужно взять только цифры с "конца"




   Наверх