-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Los colores primarios son el rojo, amarillo y azul, los secundarios naranja, verde y violeta. Determinar a partir del ingreso de dos colores primarios y el color secundario que se pueda crear, por ejemplo azul y amarillo formar verde, rojo y amarrillo forman naranja y rojo y azul forman violeta. Si no se puede formar ningún color secundario mostrar un mensaje de error, cosa contrario mostrar el color.
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
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
Proceso ColorSecundario
Escribir "Selecciona el valor de color 1.";
Escribir " 1.- Rojo";
Escribir " 2.- Amarillo";
Escribir " 3.- Azul";
Escribir Sin Saltar " :";
Repetir
Leer color_1;
Si color_1<1 O color_1>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que color_1>=1 Y color_1<=3;
Escribir "Selecciona el valor de color 2.";
Escribir " 1.- Rojo";
Escribir " 2.- Amarillo";
Escribir " 3.- Azul";
Escribir Sin Saltar " :";
Repetir
Leer color_2;
Si color_2<1 O color_2>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que color_2>=1 Y color_2<=3;
Si (color_1 = 3 Y color_2 = 2) O (color_1 = 2 Y color_2 = 3) Entonces
Escribir "Verde";
FinSi
Si (color_1 = 1 Y color_2 = 2) O (color_1 = 2 Y color_2 = 1) Entonces
Escribir "Naranja";
FinSi
Si (color_1 = 1 Y color_2 = 3) O (color_1 = 3 Y color_2 = 1) Entonces
Escribir "Violeta";
FinSi
Si color_1 = color_2 Entonces
Escribir "Error";
FinSi
FinProceso
Escribir "Selecciona el valor de color 1.";
Escribir " 1.- Rojo";
Escribir " 2.- Amarillo";
Escribir " 3.- Azul";
Escribir Sin Saltar " :";
Repetir
Leer color_1;
Si color_1<1 O color_1>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que color_1>=1 Y color_1<=3;
Escribir "Selecciona el valor de color 2.";
Escribir " 1.- Rojo";
Escribir " 2.- Amarillo";
Escribir " 3.- Azul";
Escribir Sin Saltar " :";
Repetir
Leer color_2;
Si color_2<1 O color_2>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que color_2>=1 Y color_2<=3;
Si (color_1 = 3 Y color_2 = 2) O (color_1 = 2 Y color_2 = 3) Entonces
Escribir "Verde";
FinSi
Si (color_1 = 1 Y color_2 = 2) O (color_1 = 2 Y color_2 = 1) Entonces
Escribir "Naranja";
FinSi
Si (color_1 = 1 Y color_2 = 3) O (color_1 = 3 Y color_2 = 1) Entonces
Escribir "Violeta";
FinSi
Si color_1 = color_2 Entonces
Escribir "Error";
FinSi
FinProceso