Sueldo mensual de N empleados en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Hacer un programa que calcule el sueldo mensual de N empleados de una empresa. Se ingresa el nombre, numero de días trabajados, faltas por cada empleado.
También se pide el monto total de sueldos de todos los empleados.
El número de empleados que ganan entre 2500 y 3500.
El número de empleados que ganan menos de 1000 o más de 4000.
Considere constante el pago por día a cada empleado y que el descuento por día de falta es de 100% del pago diario.

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

Proceso SueldoMensualDeNEmpleados

    empleados_menos_1000 <- 0;

    empleados_entre_2500_y_3500 <- 0;

    empleados_mas_4000 <- 0;

    sueldos_de_todos <- 0;

    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 nombre:";

        Leer nombre;

        Escribir Sin Saltar "Ingresa el valor de dias trabajados:";

        Leer dias_trabajados;

        Escribir Sin Saltar "Ingresa el valor de faltas:";

        Leer faltas;

        Escribir Sin Saltar "Ingresa el valor de pago por dia:";

        Leer pago_por_dia;

        sueldo_mensual <- (dias_trabajados-faltas)*pago_por_dia;

        Si sueldo_mensual<1000 Entonces

            empleados_menos_1000 <- empleados_menos_1000+1;

        FinSi

        Si sueldo_mensual>=2500 Y sueldo_mensual<=3500 Entonces

            empleados_entre_2500_y_3500 <- empleados_entre_2500_y_3500+1;

        FinSi

        Si sueldo_mensual>4000 Entonces

            empleados_mas_4000 <- empleados_mas_4000+1;

        FinSi

        sueldos_de_todos <- sueldos_de_todos+sueldo_mensual;

        Escribir "Nombre: ", nombre;

        Escribir "Valor de sueldo mensual: ", sueldo_mensual;

        Escribir "";

    FinPara

    Escribir "Valor de empleados menos 1000: ", empleados_menos_1000;

    Escribir "Valor de empleados entre 2500 y 3500: ", empleados_entre_2500_y_3500;

    Escribir "Valor de empleados mas 4000: ", empleados_mas_4000;

    Escribir "Valor de sueldos de todos: ", sueldos_de_todos;

FinProceso