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

Вниз

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

 
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 вся ветка

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

Наверх





Память: 0.46 MB
Время: 0.118 c
4-1114862396
Новичек
2005-04-30 15:59
2005.06.29
Рисование с помощью API.


11-1101454403
TKV
2004-11-26 10:33
2005.06.29
Прооблема с BapTrayIcon при запуске приложения выдает ошибку 216.


3-1116153138
Layner
2005-05-15 14:32
2005.06.29
Как отловить событие возникающее при редактировании в гриде


1-1117721563
Erik1
2005-06-02 18:12
2005.06.29
Как записать указатель на процедуру в масв?


14-1117391037
Cerberus
2005-05-29 22:23
2005.06.29
Ностальгия





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский