Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Pascal

Idiom #80 Truncate floating point number to integer

Declare integer y and initialize it with the value of floating point number x . Ignore non-integer digits of x .
Make sure to truncate towards zero: a negative x must yield the closest greater integer (not lesser).

var
  y: integer;
  x: single = -0.8;
begin
  y := trunc(x);
end;
Y : constant Integer := Integer (Float'Truncation (X));
New implementation...
< > ⌨
deleplace 
var
  y: integer;
  x: single = -0.8;
begin
  y := trunc(x);
end;
Y : constant Integer := Integer (Float'Truncation (X));

int y = (int)x;
int y = static_cast<int>(x);
int y = (int)x;
int y = cast(int)x;
int y = x.toInt()
y = trunc(x)
integer :: y
real  :: x
y=x
y := int(x)
def y = x as int
y = truncate x

let y = BigInt (x | 0)
int y = (int)x;
(truncate x)

y = math.modf(x)
$y = (int)$x;
my $y = int($x);
y = int(x)
y = x.to_i
let y = x as i32;