RosettaCodeData/Task/Roman-numerals-Encode/Befunge/roman-numerals-encode.bf

7 lines
141 B
Brainfuck

&>0\0>00p:#v_$ >:#,_ $ @
4-v >5+#:/#<\55+%:5/\5%:
vv_$9+00g+5g\00g8+>5g\00
g>\20p>:10p00g \#v _20gv
> 2+ v^-1g01\g5+8<^ +9 _
IVXLCDM