练习题（阿拉伯数字转化为罗马数字）

ly5066113

回复 1# yestreenstars


枚举法。

1. awk -F '' '
   
2. BEGIN{
   
3.         a[1] = "I"
   
4.         a[2] = "II"
   
5.         a[3] = "III"
   
6.         a[4] = "IV"
   
7.         a[5] = "V"
   
8.         a[6] = "VI"
   
9.         a[7] = "VII"
   
10.         a[8] = "VIII"
    
11.         a[9] = "IX"
    
12.         a[10] = "X"
    
13.         a[20] = "XX"
    
14.         a[30] = "XXX"
    
15.         a[40] = "XL"
    
16.         a[50] = "L"
    
17.         a[60] = "LX"
    
18.         a[70] = "LXX"
    
19.         a[80] = "LXXX"
    
20.         a[90] = "XC"
    
21.         a[100] = "C"
    
22.         a[200] = "CC"
    
23.         a[300] = "CCC"
    
24.         a[400] = "CD"
    
25.         a[500] = "D"
    
26.         a[600] = "DC"
    
27.         a[700] = "DCC"
    
28.         a[800] = "DCCC"
    
29.         a[900] = "CM"
    
30.         a[1000] = "M"
    
31.         a[2000] = "MM"
    
32.         a[3000] = "MMM"
    
33. }
    
34. {
    
35.         if($1<=0||$1>=4000)
    
36.                 next
    
37.         for(i=1;i<=NF;i++)
    
38.                 printf a[$i*10^(NF-i)]
    
39.         print ""
    
40. }
    
41. ' file

复制代码

ly5066113

回复 20# yestreenstars


lazy more

1. perl -MRoman -lne 'print Roman($_)' file

复制代码