Salario por bonificación, descuento y categoría en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Determinar el salario neto de un empleado de una compañía con base en el salario básico, bonificación, descuento y categoría. Considere la siguiente tabla:
Categoría | Bonificación | Descuento
1 | 15% | 4%
2 | 13% | 3%
3 | 12% | 2%
4 | 9.5% | 0%

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

Proceso SalarioPorBonificacionDescuentoYCategoria

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

    Leer categoria;

    Escribir Sin Saltar "Ingresa el valor de salario basico:";

    Leer salario_basico;

    bonificacion <- 0;

    descuento <- 0;

    Si categoria = 1 Entonces

        bonificacion <- salario_basico*0.15;

        descuento <- salario_basico*0.04;

    FinSi

    Si categoria = 2 Entonces

        bonificacion <- salario_basico*0.13;

        descuento <- salario_basico*0.03;

    FinSi

    Si categoria = 3 Entonces

        bonificacion <- salario_basico*0.12;

        descuento <- salario_basico*0.02;

    FinSi

    Si categoria = 4 Entonces

        bonificacion <- salario_basico*0.095;

    FinSi

    salario_neto <- salario_basico+bonificacion-descuento;

    Escribir "Valor de bonificacion: ", bonificacion;

    Escribir "Valor de descuento: ", descuento;

    Escribir "Valor de salario neto: ", salario_neto;

FinProceso