PseInt_Practica18_CalculoSalarioSemanal

Proceso practica28_CalculoSalarioSemanal
    // Se necesita un programa que calcule el salario semanal de n trabajadores, el cual
    // depende de su puesto (licenciado, tecnico, obrero), del turno (primero, segundo
    // y tercero) y las horas trabajadas. Donde los del primer turno ganar 200 adicionales
    // a su salario, los del segundo 100 y los del tercero 300. El obrero gana 30 por hora
    // el tecnico 50 y el licenciado 100

    puesto <- 0;
    turno <- 0;
    horas_trab <- 0;
    salario <- 0;
    respuesta <-"n"

    Escribir "Deseas calcular la nomina de la semana? (s/n)";
    Leer respuesta;
    Mientras respuesta = "s" Hacer
        Escribir "Cuantas fueron las horas trabajadas del empleado?";
        Leer horas_trab;
        Escribir "Cual es su puesto de trabajo?";
        Escribir "1. Obrero";
        Escribir "2. Tecnico";
        Escribir "3. Licenciado";
        Leer puesto;
        Escribir "En que turno labora? (1=Matutino, 2=Vespertino, 3=Nocturno";
        Leer turno;
        Segun turno Hacer
            1:
                Si puesto = 1 Entonces
                    salario <- (horas_trab * 30 )+ 200
                FinSi
                Si puesto = 2 Entonces
                    salario <- (horas_trab * 50 ) + 200
                FinSi
                Si puesto = 3 Entonces
                    salario <- (horas_trab * 100) + 200
                FinSi
            2:
                Si puesto = 1 Entonces
                    salario <- (horas_trab * 30 )+ 100
                FinSi
                Si puesto = 2 Entonces
                    salario <- (horas_trab * 50 ) + 100
                FinSi
                Si puesto = 3 Entonces
                    salario <- (horas_trab * 100) + 100
                FinSi
            3:
            Si puesto = 1 Entonces
                    salario <- (horas_trab * 30 )+ 300
                FinSi
                Si puesto = 2 Entonces
                    salario <- (horas_trab * 50 ) + 300
                FinSi
                Si puesto = 3 Entonces
                    salario <- (horas_trab * 100) + 300
                FinSi
        FinSegun
        Escribir "Su salario semanal es de: ", salario
        Escribir "====================================";
        Escribir "Deseas calcular a otro empleado? (s/n)";
        Leer respuesta;
    FinMientras
FinProceso