RoundDown(Value: Double; Precision: Integer): Double;
RoundDown(Value: double; Precision: integer): double;
Value. Округляемое вещественное число;
Precision. Количество дробных разрядов, до которого требуется округлить число.
Метод RoundDown возвращает результат округления числа до ближайшего меньшего по модулю значения.
Значения входных параметров не могут быть пустыми.
Если количество дробных разрядов больше 0, то число округляется с недостатком до заданного количества десятичных разрядов справа от запятой.
Если количество дробных разрядов равно 0, то число округляется вниз до ближайшего целого.
Если количество дробных разрядов меньше 0, то число округляется с недостатком до заданного количества десятичных разрядов слева от запятой.
Метод RoundDown подобен методу IMath.Round, за тем исключением, что число всегда округляется с недостатком.
Для выполнения примера добавьте ссылку на системную сборку MathFin.
Sub UserProc;
Var
r1, r2, r3, r4: Double;
Begin
r1 := Math.RoundDown(2.15,1);
Debug.WriteLine(r1);
r2 := Math.RoundDown(-50.654,-2);
Debug.WriteLine(r2);
r3 := Math.RoundDown(21.5,-1);
Debug.WriteLine(r3);
r4 := Math.RoundDown(-1.475,2);
Debug.WriteLine(r4);
End Sub UserProc;
В результате выполнения примера в окно консоли будут выведены результаты округления:
Число и количество разрядов положительны: «2.1»;
Число и количество разрядов отрицательны: «0»;
Число положительно, а количество разрядов отрицательно: «20»;
Число отрицательно, а количество разрядов положительно: «-1.47».
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.MathFin;
…
Public Shared Sub Main(Params: StartParams);
Var
r1, r2, r3, r4: double;
Math: MathClass = New MathClass();
Begin
r1 := Math.RoundDown(2.15,1);
System.Diagnostics.Debug.WriteLine(r1);
r2 := Math.RoundDown(-50.654,-2);
System.Diagnostics.Debug.WriteLine(r2);
r3 := Math.RoundDown(21.5,-1);
System.Diagnostics.Debug.WriteLine(r3);
r4 := Math.RoundDown(-1.475,2);
System.Diagnostics.Debug.WriteLine(r4);
End Sub;
См. также: