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

Round, Trunc и ничего не понял   Найти похожие ветки 

← →
Smithson ©   (2002-10-03 16:49) [0]

Товарищи!
тут знакомый потыкал пальцем в help. Команда Round округляет дробное число к ближайшему четному целому. Команда Trunc округляет дробное число до целого в сторону нуля. Команда Int отбрасывает дробную часть дробного числа. А КАКАЯ КОМАНДА ОКРУГЛЯЕТ НОРМАЛЬНО - В СТОРОНУ БЛИЖАЙШЕГО ЦЕЛОГО?


← →
Демонов Е.В. ©   (2002-10-03 16:51) [1]

Round


← →
Best Before 2024   (2002-10-03 16:53) [2]

>>Команда Round округляет дробное число к ближайшему четному целому.
Только для чисел типа 5.5 7.5
см SimpleRoundTo


← →
Smithson ©   (2002-10-03 16:54) [3]

Еще раз:
The Round function rounds a real-type value to an integer-type value.

X is a real-type expression. Round returns an Int64 value that is the value of X rounded to the nearest whole number. If X is exactly halfway between two whole numbers, the result is always the [b]even[/b] number.

Я не спрашиваю, как было в Паскале. Я спрашиваю про Delphi (начиная с 5 версии).


← →
Smithson ©   (2002-10-03 16:55) [4]

SimpleRoundTo у меня в Делфи нет


← →
Оля   (2002-10-03 16:58) [5]

n:= Round ((Ttr_1-Ttr_2)*2); // но у меня D4 не знаю как в 5-й


← →
Smithson ©   (2002-10-03 16:59) [6]

Все, разобрался. Тормоз.


← →
Best Before 2024   (2002-10-03 17:00) [7]

If X is exactly halfway between two whole numbers


← →
MBo ©   (2002-10-03 17:01) [8]

>Smithson
такого, увы, нет
еще есть Ceil и Floor (вверх и вниз)
А к ближайшему придется самому сделать.
Round себя так ведет в соотв. с принятым для сопроцессора (IEEE какой-то там стандарт) соглашением


← →
Smithson ©   (2002-10-03 17:02) [9]

Round(2.5) = 2 //Бл..............!!!!
Round(2.51) = 3;
Round(3.5) = 4;
Round(3.51) = 4;

Спасибо. Раз нет, значит нет.



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

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



Память: 0.46 MB
Время: 0.01 c
1-45299
USTAS
2002-10-01 10:47
2002.10.14
Подсобите теорией Мастера


3-45226
AlexeyBl
2002-09-21 18:08
2002.10.14
Как поместить картинку в заголовок столбца TBDGrid ?


14-45565
kaif
2002-09-16 14:08
2002.10.14
Эзоп - первый антидельфиец.


4-45654
MikeZ
2002-08-31 17:39
2002.10.14
Обновить System Tray


3-45229
Atamali Mamedov
2002-09-24 09:45
2002.10.14
Interbase External Functions




   Наверх