Language:
Русский
English
{Round.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the Round function.}
uses WinCrt;
begin
Writeln(1.4, ' rounds to ', Round(1.4));
Writeln(1.5, ' rounds to ', Round(1.5));
Writeln(-1.4, ' rounds to ', Round(-1.4));
Writeln(-1.5, ' rounds to ', Round(-1.5));
end.