-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Un operario de retroexcavadoras le pagan por horas trabajadas ($70,000 la hora), si al final de la semana el cumple más de 40 horas recibirá un incentivo del 15% sobre el valor pagado, caso contrario, no recibe remuneración extra. Realizar el cálculo del valor a pagar.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
2
3
4
5
6
7
8
9
10
11
12
13
14
Proceso OperarioDeRetroexcavadoras
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
pagado <- horas_trabajadas*70000;
Si horas_trabajadas>40 Entonces
incentivo <- pagado*0.15;
SiNo
incentivo <- 0;
FinSi
a_pagar <- pagado+incentivo;
Escribir "Valor de a pagar: ", a_pagar;
Escribir "Valor de incentivo: ", incentivo;
Escribir "Valor de pagado: ", pagado;
FinProceso
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
pagado <- horas_trabajadas*70000;
Si horas_trabajadas>40 Entonces
incentivo <- pagado*0.15;
SiNo
incentivo <- 0;
FinSi
a_pagar <- pagado+incentivo;
Escribir "Valor de a pagar: ", a_pagar;
Escribir "Valor de incentivo: ", incentivo;
Escribir "Valor de pagado: ", pagado;
FinProceso