-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Recibe un número arábigo y muestra su equivalencia en notación romana
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
Algoritmo ProcesoRomano
Escribir Sin Saltar "Ingrese un número arábigo:";
Leer numero;
Escribir "";
Segun ((numero - numero MOD 1000) / 1000) MOD 10 Hacer
1:
Escribir Sin Saltar "M";
2:
Escribir Sin Saltar "MM";
3:
Escribir Sin Saltar "MMM";
4:
Escribir "__";
Escribir Sin Saltar "IV";
5:
Escribir "_";
Escribir Sin Saltar "V";
6:
Escribir "__";
Escribir Sin Saltar "VI";
7:
Escribir "___";
Escribir Sin Saltar "VII";
8:
Escribir "____";
Escribir Sin Saltar "VIII";
9:
Escribir "__";
Escribir Sin Saltar "IX";
FinSegun
Segun ((numero - numero MOD 100) / 100) MOD 10 Hacer
1:
Escribir Sin Saltar "C";
2:
Escribir Sin Saltar "CC";
3:
Escribir Sin Saltar "CCC";
4:
Escribir Sin Saltar "CD";
5:
Escribir Sin Saltar "D";
6:
Escribir Sin Saltar "DC";
7:
Escribir Sin Saltar "DCC";
8:
Escribir Sin Saltar "DCCC";
9:
Escribir Sin Saltar "CM";
FinSegun
Segun ((numero - numero MOD 10) / 10) MOD 10 Hacer
1:
Escribir Sin Saltar "X";
2:
Escribir Sin Saltar "XX";
3:
Escribir Sin Saltar "XXX";
4:
Escribir Sin Saltar "XL";
5:
Escribir Sin Saltar "L";
6:
Escribir Sin Saltar "LX";
7:
Escribir Sin Saltar "LXX";
8:
Escribir Sin Saltar "LXXX";
9:
Escribir Sin Saltar "XC";
FinSegun
Segun numero MOD 10 Hacer
1:
Escribir Sin Saltar "I";
2:
Escribir Sin Saltar "II";
3:
Escribir Sin Saltar "III";
4:
Escribir Sin Saltar "IV";
5:
Escribir Sin Saltar "V";
6:
Escribir Sin Saltar "VI";
7:
Escribir Sin Saltar "VII";
8:
Escribir Sin Saltar "VIII";
9:
Escribir Sin Saltar "IX";
FinSegun
Escribir "";
FinAlgoritmo
Escribir Sin Saltar "Ingrese un número arábigo:";
Leer numero;
Escribir "";
Segun ((numero - numero MOD 1000) / 1000) MOD 10 Hacer
1:
Escribir Sin Saltar "M";
2:
Escribir Sin Saltar "MM";
3:
Escribir Sin Saltar "MMM";
4:
Escribir "__";
Escribir Sin Saltar "IV";
5:
Escribir "_";
Escribir Sin Saltar "V";
6:
Escribir "__";
Escribir Sin Saltar "VI";
7:
Escribir "___";
Escribir Sin Saltar "VII";
8:
Escribir "____";
Escribir Sin Saltar "VIII";
9:
Escribir "__";
Escribir Sin Saltar "IX";
FinSegun
Segun ((numero - numero MOD 100) / 100) MOD 10 Hacer
1:
Escribir Sin Saltar "C";
2:
Escribir Sin Saltar "CC";
3:
Escribir Sin Saltar "CCC";
4:
Escribir Sin Saltar "CD";
5:
Escribir Sin Saltar "D";
6:
Escribir Sin Saltar "DC";
7:
Escribir Sin Saltar "DCC";
8:
Escribir Sin Saltar "DCCC";
9:
Escribir Sin Saltar "CM";
FinSegun
Segun ((numero - numero MOD 10) / 10) MOD 10 Hacer
1:
Escribir Sin Saltar "X";
2:
Escribir Sin Saltar "XX";
3:
Escribir Sin Saltar "XXX";
4:
Escribir Sin Saltar "XL";
5:
Escribir Sin Saltar "L";
6:
Escribir Sin Saltar "LX";
7:
Escribir Sin Saltar "LXX";
8:
Escribir Sin Saltar "LXXX";
9:
Escribir Sin Saltar "XC";
FinSegun
Segun numero MOD 10 Hacer
1:
Escribir Sin Saltar "I";
2:
Escribir Sin Saltar "II";
3:
Escribir Sin Saltar "III";
4:
Escribir Sin Saltar "IV";
5:
Escribir Sin Saltar "V";
6:
Escribir Sin Saltar "VI";
7:
Escribir Sin Saltar "VII";
8:
Escribir Sin Saltar "VIII";
9:
Escribir Sin Saltar "IX";
FinSegun
Escribir "";
FinAlgoritmo