-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Un trabajador de acuerdo al turno (mañana, tarde y noche) que trabaja gana $3,000, $3,200 y $3,500.
Si la persona nació un día lunes, miércoles y viernes le corresponde un bono de 12% del promedio de los sueldos por turnos, si nació un martes y jueves le corresponde a un 11% del sueldo del turno mañana y tarde, para las demás personas le corresponde del 9% del sueldo del turno de noche.
Calcular los siguientes requerimientos.
- Ingreso de datos.
- Cálculo el bono.
- Mostrar el sueldo neto.
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
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
Proceso BonoPorTurno
sueldo_bruto <- 0;
bono <- 0;
Escribir "Selecciona el valor de turno.";
Escribir " 1.- Mañana";
Escribir " 2.- Tarde";
Escribir " 3.- Noche";
Escribir Sin Saltar " :";
Repetir
Leer turno;
Si turno<1 O turno>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que turno>=1 Y turno<=3;
Escribir "Selecciona el valor de dia de nacimiento.";
Escribir " 1.- Domingo";
Escribir " 2.- Lunes";
Escribir " 3.- Martes";
Escribir " 4.- Miércoles";
Escribir " 5.- Jueves";
Escribir " 6.- Viernes";
Escribir " 7.- Sábado";
Escribir Sin Saltar " :";
Repetir
Leer dia_de_nacimiento;
Si dia_de_nacimiento<1 O dia_de_nacimiento>7 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que dia_de_nacimiento>=1 Y dia_de_nacimiento<=7;
Si turno = 1 Entonces
sueldo_bruto <- 3000;
FinSi
Si turno = 2 Entonces
sueldo_bruto <- 3200;
FinSi
Si turno = 3 Entonces
sueldo_bruto <- 3500;
FinSi
Si dia_de_nacimiento = 2 O dia_de_nacimiento = 4 O dia_de_nacimiento = 6 Entonces
bono <- 0.12*(3000+3200+3500)/3;
FinSi
Si dia_de_nacimiento = 3 O dia_de_nacimiento = 5 Entonces
bono <- 0.11*(3000+3200);
FinSi
Si dia_de_nacimiento = 1 O dia_de_nacimiento = 7 Entonces
bono <- 0.09*3500;
FinSi
sueldo_neto <- sueldo_bruto+bono;
Escribir "Valor de bono: ", bono;
Escribir "Valor de sueldo bruto: ", sueldo_bruto;
Escribir "Valor de sueldo neto: ", sueldo_neto;
FinProceso
sueldo_bruto <- 0;
bono <- 0;
Escribir "Selecciona el valor de turno.";
Escribir " 1.- Mañana";
Escribir " 2.- Tarde";
Escribir " 3.- Noche";
Escribir Sin Saltar " :";
Repetir
Leer turno;
Si turno<1 O turno>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que turno>=1 Y turno<=3;
Escribir "Selecciona el valor de dia de nacimiento.";
Escribir " 1.- Domingo";
Escribir " 2.- Lunes";
Escribir " 3.- Martes";
Escribir " 4.- Miércoles";
Escribir " 5.- Jueves";
Escribir " 6.- Viernes";
Escribir " 7.- Sábado";
Escribir Sin Saltar " :";
Repetir
Leer dia_de_nacimiento;
Si dia_de_nacimiento<1 O dia_de_nacimiento>7 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que dia_de_nacimiento>=1 Y dia_de_nacimiento<=7;
Si turno = 1 Entonces
sueldo_bruto <- 3000;
FinSi
Si turno = 2 Entonces
sueldo_bruto <- 3200;
FinSi
Si turno = 3 Entonces
sueldo_bruto <- 3500;
FinSi
Si dia_de_nacimiento = 2 O dia_de_nacimiento = 4 O dia_de_nacimiento = 6 Entonces
bono <- 0.12*(3000+3200+3500)/3;
FinSi
Si dia_de_nacimiento = 3 O dia_de_nacimiento = 5 Entonces
bono <- 0.11*(3000+3200);
FinSi
Si dia_de_nacimiento = 1 O dia_de_nacimiento = 7 Entonces
bono <- 0.09*3500;
FinSi
sueldo_neto <- sueldo_bruto+bono;
Escribir "Valor de bono: ", bono;
Escribir "Valor de sueldo bruto: ", sueldo_bruto;
Escribir "Valor de sueldo neto: ", sueldo_neto;
FinProceso