Функция Round в Delphi округление чисел с плавающей запятой до целого числа.
System unit
function Round (const Number : Extended) : Int64;
Функция Round округляет число с плавающей запятой (Number) до целого значения.
Округление использует банковские правила, где точная половина значения вызывает округление к четному числу:
Пример 1.
- 12.4 округляется до 12
- 12.5 округляется до 12
- 12.6 округляется до 13
Пример 2.
- 13.4 округляется до 13
- 13.5 округляется до 14
- 13.6 округляется до 14
Примечание.
Функция Trunc делает то же самое, но возвращает целое число в Integer значении.
Функция Round: Округление чисел с плавающей запятой до целого числа
begin
ShowMessage('Round(12.75) = '+IntToStr(Round(12.75)));
ShowMessage('Trunc(12.75) = '+IntToStr(Trunc(12.75)));
ShowMessage(' Int(12.75) = '+FloatToStr(Int(12.75)));
ShowMessage(' Frac(12.75) = '+FloatToStr(Frac(12.75)));
end;Результат
Round(12.75) = 13
Trunc(12.75) = 12
Int(12.75) = 12
Frac(12.75) = 0.75
Похожие функции и команды
Frac — дробная часть числа с плавающей запятой.
Int — целая часть числа с плавающей точкой.
Trunc — целая часть числа с плавающей запятой.
Угостить автора чашечкой кофе