-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Determinar el sueldo semanal total que debe pagar una empresa a N trabajadores con base en el número de horas trabajadas (máximo 50 horas) y al valor por hora, considerando que a partir de la hora número 41 y hasta la 45, cada hora se le paga el doble, de la hora 46 a la 50, se paga el triple.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Proceso SueldoSemanalHasta50Horas2
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
Escribir Sin Saltar "Ingresa el valor de pago por hora:";
Leer pago_por_hora;
sueldo_semanal <- horas_trabajadas*pago_por_hora;
Si horas_trabajadas>40 Entonces
sueldo_semanal <- sueldo_semanal+(horas_trabajadas-40)*pago_por_hora;
FinSi
Si horas_trabajadas>45 Entonces
sueldo_semanal <- sueldo_semanal+(horas_trabajadas-45)*pago_por_hora;
FinSi
Si horas_trabajadas>50 Entonces
sueldo_semanal <- 0;
Escribir "No está permitido.";
FinSi
Escribir "Valor de sueldo semanal: ", sueldo_semanal;
Escribir "";
FinPara
FinProceso
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
Escribir Sin Saltar "Ingresa el valor de pago por hora:";
Leer pago_por_hora;
sueldo_semanal <- horas_trabajadas*pago_por_hora;
Si horas_trabajadas>40 Entonces
sueldo_semanal <- sueldo_semanal+(horas_trabajadas-40)*pago_por_hora;
FinSi
Si horas_trabajadas>45 Entonces
sueldo_semanal <- sueldo_semanal+(horas_trabajadas-45)*pago_por_hora;
FinSi
Si horas_trabajadas>50 Entonces
sueldo_semanal <- 0;
Escribir "No está permitido.";
FinSi
Escribir "Valor de sueldo semanal: ", sueldo_semanal;
Escribir "";
FinPara
FinProceso