Function Trunc (X : real) : Longint;
Trunc returns the integer part of X, which is always smaller than (or equal to) X.
None.
Program Example54;
{ Program to demonstrate the Trunc function. }
begin
Writeln (Trunc(123.456)); { Prints 123 }
Writeln (Trunc(-123.456)); { Prints -123 }
Writeln (Trunc(12.3456)); { Prints 12 }
Writeln (Trunc(-12.3456)); { Prints -12 }
end.