$use StdIO Arithm Convert;

Main {
  = <Chars-To-Bytes '_'> : s.d = <WriteLN s.d> <WriteLN <Div-Rem s.d 16>>;
};