program T12; var i: integer; begin writeln(DecToRoman(1984)); i:=RomanToDec('MCMLXXXIV'); writeln(I); end.