• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    En una empresa de computadoras, los salarios de los empleados se van a aumentar de acuerdo a su contrato actual:

    1) Los contratos que están de $0 a $9,000 el aumento es de un 20%.
    2) Los contratos de $9,001 a $15,000 el aumento es de un 10%.
    3) Los contratos de $15,001 a $20,000 el aumento es de 5%.
    4) Los contratos más de $20,000 el aumento es de 0.

    Permita conocer las cantidad de empleados en cada uno de los rangos y cuento les corresponde de aumento.

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
38
Proceso AumentoPorRango
    rango_1 <- 0;
    rango_2 <- 0;
    rango_3 <- 0;
    rango_4 <- 0;
    Repetir
        Escribir Sin Saltar "Ingresa el valor de salario:";
        Leer salario;
        aumento <- 0;
        Si salario>=0 Y salario<=9000 Entonces
            rango_1 <- rango_1+1;
            aumento <- salario*0.2;
        FinSi
        Si salario>9000 Y salario<=15000 Entonces
            rango_2 <- rango_2+1;
            aumento <- salario*0.1;
        FinSi
        Si salario>15000 Y salario<=20000 Entonces
            rango_3 <- rango_3+1;
            aumento <- salario*0.05;
        FinSi
        Si salario>20000 Entonces
            rango_4 <- rango_4+1;
        FinSi
        salario_aumentado <- salario+aumento;
        Escribir "Valor de aumento: ", aumento;
        Escribir "Valor de salario aumentado: ", salario_aumentado;
        Escribir "";
        Repetir
            Escribir Sin Saltar "¿Deseas repetir el proceso? (S/N):";
            Leer tecla_repetir;
        Hasta Que tecla_repetir='s' O tecla_repetir='n' O tecla_repetir='S' O tecla_repetir='N'
    Hasta Que tecla_repetir='n' O tecla_repetir='N'
    Escribir "Valor de rango 1: ", rango_1;
    Escribir "Valor de rango 2: ", rango_2;
    Escribir "Valor de rango 3: ", rango_3;
    Escribir "Valor de rango 4: ", rango_4;
FinProceso