RosettaCodeData/Task/Roman-numerals-Encode/Maple/roman-numerals-encode.maple

5 lines
132 B
Plaintext

> for n in [ 1666, 1990, 2008 ] do printf( "%d\t%s\n", n, convert( n, 'roman' ) ) end:
1666 MDCLXVI
1990 MCMXC
2008 MMVIII