use warnings;
print round(-198.25), "\n"; # -198
print round(198.25), "\n"; # 198
print round(198.75), "\n"; # 199
use warnings;
print nearest(1, 198.25), "\n"; # 198
print nearest(0.1, 198.25), "\n"; # 198.3
print nearest(10, 198.25), "\n"; # 200
print nearest(0.1, -198.25), "\n"; # -198.3