Question

How to round a floating-point number to an integer in Pascal

Answer 1

program RoundRFoatingPoint;

var
  y: integer;
  x: double;
  
begin
  x := 9382.4;
  y := round(x);
  WriteLn(y);
  
  x := 9382.5;
  y := round(x);
  WriteLn(y);
  
  x := 9382.6;
  y := round(x);
  WriteLn(y);
  
end.


  
(*
run:
  
9382
9382
9383
  
*)

 

70+ SQL courses for beginners and professionals