-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Obtener la nómina mensual (salario neto) de un empleado de una empresa cuyo trabajo se paga por horas, teniendo en cuenta que:
- Las horas inferiores o iguales a 48 (semanales) se paga a una tarifa determinada, que se debe capturar, al igual que el número de horas y la identificación del trabajador.
- Las horas superiores a 190 mensuales se pagaran como extras con un recargo del 25%.
Los impuestos a deducir varían en función del sueldo así:
- Sueldo <= 3.500.000 pesos no tiene impuesto.
- Los siguientes 500.0000 pesos al 10%.
- El resto al 15%.
Imprimir sueldo básico, horas extras, descuentos, salario 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
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
Proceso NominaMensual
Escribir Sin Saltar "Ingresa el identificacion del trabajador:";
Leer identificacion_del_trabajador;
Escribir Sin Saltar "Ingresa el valor de numero de horas:";
Leer numero_de_horas;
Escribir Sin Saltar "Ingresa el valor de tarifa determinada:";
Leer tarifa_determinada;
Si numero_de_horas>190 Entonces
horas_extras <- numero_de_horas-190;
SiNo
horas_extras <- 0;
FinSi
salario_basico <- tarifa_determinada*numero_de_horas+tarifa_determinada*0.25*horas_extras;
impuestos <- 0;
Si salario_basico>3500000 Y salario_basico<=5000000 Entonces
impuestos <- salario_basico*0.1;
FinSi
Si salario_basico>5000000 Entonces
impuestos <- salario_basico*0.15;
FinSi
salario_neto <- salario_basico-impuestos;
Escribir "Identificacion del trabajador: ", identificacion_del_trabajador;
Escribir "Valor de horas extras: ", horas_extras;
Escribir "Valor de impuestos: ", impuestos;
Escribir "Valor de salario basico: ", salario_basico;
Escribir "Valor de salario neto: ", salario_neto;
FinProceso
Escribir Sin Saltar "Ingresa el identificacion del trabajador:";
Leer identificacion_del_trabajador;
Escribir Sin Saltar "Ingresa el valor de numero de horas:";
Leer numero_de_horas;
Escribir Sin Saltar "Ingresa el valor de tarifa determinada:";
Leer tarifa_determinada;
Si numero_de_horas>190 Entonces
horas_extras <- numero_de_horas-190;
SiNo
horas_extras <- 0;
FinSi
salario_basico <- tarifa_determinada*numero_de_horas+tarifa_determinada*0.25*horas_extras;
impuestos <- 0;
Si salario_basico>3500000 Y salario_basico<=5000000 Entonces
impuestos <- salario_basico*0.1;
FinSi
Si salario_basico>5000000 Entonces
impuestos <- salario_basico*0.15;
FinSi
salario_neto <- salario_basico-impuestos;
Escribir "Identificacion del trabajador: ", identificacion_del_trabajador;
Escribir "Valor de horas extras: ", horas_extras;
Escribir "Valor de impuestos: ", impuestos;
Escribir "Valor de salario basico: ", salario_basico;
Escribir "Valor de salario neto: ", salario_neto;
FinProceso