{ Example for Round } 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.