Roman numerals/Decode: Difference between revisions

Content added Content deleted
(J)
Line 6: Line 6:
=={{header|J}}==
=={{header|J}}==


<lang j>rom2d=: [: (+/ .* _1 ^ 0,~2 </\]) 1 5 10 50 100 500 1000 {~ 'IVXLCDM'&i.</lang>
<lang j>rom2d=: [: (+/ .* _1^ 0,~ 2</\ ]) 1 5 10 50 100 500 1000 {~ 'IVXLCDM'&i.</lang>


Example use:
Example use: