pembulat angka

program pembulat_angka;
uses wincrt;
var
 x:real;
  begin
  write('masukkaan nilai yang akan dibulatkan?');
  readln(x);
  writeln('nilai pembulatnya+',int(x):9:2);
 end.