Les chiffres romain bien que peut efficace sont très utilisés encore aujourd'hui pour numéroter des annexes, suite de films et des pages de prélude. Voici leur représentation classique :
Nombre Romain | Nombre décimal | Nombre octal | Nombre hexadécimal |
---|---|---|---|
I | 1 | 1 | 1 |
II | 2 | 2 | 2 |
III | 3 | 3 | 3 |
IV | 4 | 4 | 4 |
V | 5 | 5 | 5 |
VI | 6 | 6 | 6 |
VII | 7 | 7 | 7 |
VIII | 8 | 10 | 8 |
IX | 9 | 11 | 9 |
X | 10 | 12 | A |
XI | 11 | 13 | B |
XII | 12 | 14 | C |
XIII | 13 | 15 | D |
XIV | 14 | 16 | E |
XV | 15 | 17 | F |
... | ... | ... | ... |
Toutefois, il est a noter que les chiffres romain ne dépasse que de très peu les milliers en terme de numérotation. Pour pouvoir générer automatiquement les nombres à partir de l'équivalence numérique, vous trouverez la réponse que vous souhaitez, à l'aide du code source REXX suivant:
- I=1
- Do While I<=100
- SAY I || " = " || NumberToRomain(I)
- I=I+1
- End
- EXIT
-
- NumberToRomain :Procedure
- Arg x
- s = ""
- R = TRUNC((x // 1000) / 100)
- SELECT
- WHEN R = 9 THEN S=S||"CM"
- WHEN R = 8 THEN S=S||"DCCC"
- WHEN R = 7 THEN S=S||"DCC"
- WHEN R = 6 THEN S=S||"DC"
- WHEN R = 5 THEN S=S||"D"
- WHEN R = 4 THEN S=S||"CD"
- WHEN R = 3 THEN S=S||"CCC"
- WHEN R = 2 THEN S=S||"CC"
- WHEN R = 1 THEN S=S||"C"
- OTHERWISE S=S
- END
- R = TRUNC((x // 100) / 10)
- SELECT
- WHEN R = 9 THEN S=S||"XC"
- WHEN R = 8 THEN S=S||"LXXX"
- WHEN R = 7 THEN S=S||"LXX"
- WHEN R = 6 THEN S=S||"LX"
- WHEN R = 5 THEN S=S||"L"
- WHEN R = 4 THEN S=S||"XL"
- WHEN R = 3 THEN S=S||"XXX"
- WHEN R = 2 THEN S=S||"XX"
- WHEN R = 1 THEN S=S||"X"
- OTHERWISE S=S
- END
- R = (x // 10)
- SELECT
- WHEN R = 9 THEN S=S||"IX"
- WHEN R = 8 THEN S=S||"VIII"
- WHEN R = 7 THEN S=S||"VII"
- WHEN R = 6 THEN S=S||"VI"
- WHEN R = 5 THEN S=S||"V"
- WHEN R = 4 THEN S=S||"IV"
- WHEN R = 3 THEN S=S||"III"
- WHEN R = 2 THEN S=S||"II"
- WHEN R = 1 THEN S=S||"I"
- OTHERWISE S=S
- END
- RETURN s
on obtiendra le résultat suivant:
1 = I2 = II
3 = III
4 = IV
5 = V
6 = VI
7 = VII
8 = VIII
9 = IX
10 = X
11 = XI
12 = XII
13 = XIII
14 = XIV
15 = XV
16 = XVI
17 = XVII
18 = XVIII
19 = XIX
20 = XX
21 = XXI
22 = XXII
23 = XXIII
24 = XXIV
25 = XXV
26 = XXVI
27 = XXVII
28 = XXVIII
29 = XXIX
30 = XXX
31 = XXXI
32 = XXXII
33 = XXXIII
34 = XXXIV
35 = XXXV
36 = XXXVI
37 = XXXVII
38 = XXXVIII
39 = XXXIX
40 = XL
41 = XLI
42 = XLII
43 = XLIII
44 = XLIV
45 = XLV
46 = XLVI
47 = XLVII
48 = XLVIII
49 = XLIX
50 = L
51 = LI
52 = LII
53 = LIII
54 = LIV
55 = LV
56 = LVI
57 = LVII
58 = LVIII
59 = LIX
60 = LX
61 = LXI
62 = LXII
63 = LXIII
64 = LXIV
65 = LXV
66 = LXVI
67 = LXVII
68 = LXVIII
69 = LXIX
70 = LXX
71 = LXXI
72 = LXXII
73 = LXXIII
74 = LXXIV
75 = LXXV
76 = LXXVI
77 = LXXVII
78 = LXXVIII
79 = LXXIX
80 = LXXX
81 = LXXXI
82 = LXXXII
83 = LXXXIII
84 = LXXXIV
85 = LXXXV
86 = LXXXVI
87 = LXXXVII
88 = LXXXVIII
89 = LXXXIX
90 = XC
91 = XCI
92 = XCII
93 = XCIII
94 = XCIV
95 = XCV
96 = XCVI
97 = XCVII
98 = XCVIII
99 = XCIX
100 = C
Dernière mise à jour : Lundi, le 10 novembre 2014