Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Round, Trunc ;и ничего не понял [D5, D6, WinXP]

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

Smithson (2002-10-03 17:02:00) [1]
Round(2.5) = 2 //Бл..............!!!!
Round(2.51) = 3;
Round(3.5) = 4;
Round(3.51) = 4;

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

MBo (2002-10-03 17:01:00) [2]
>Smithson
такого, увы, нет
еще есть Ceil и Floor (вверх и вниз)
А к ближайшему придется самому сделать.
Round себя так ведет в соотв. с принятым для сопроцессора (IEEE какой-то там стандарт) соглашением

Best Before 2024 (2002-10-03 17:00:00) [3]
If X is exactly halfway between two whole numbers

Smithson (2002-10-03 16:59:00) [4]
Все, разобрался. Тормоз.

Оля (2002-10-03 16:58:00) [5]
n:= Round ((Ttr_1-Ttr_2)*2); // но у меня D4 не знаю как в 5-й

Smithson (2002-10-03 16:55:00) [6]
SimpleRoundTo у меня в Делфи нет

Smithson (2002-10-03 16:54:00) [7]
Еще раз:
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 версии).

Best Before 2024 (2002-10-03 16:53:00) [8]
>>Команда Round округляет дробное число к ближайшему четному целому.
Только для чисел типа 5.5 7.5
см SimpleRoundTo

Демонов Е.В. (2002-10-03 16:51:00) [9]
Round

Наверх

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