• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    En una universidad, los alumnos pagan sus mensualidades según la carrera que estudian:
    Carrera | Pago mensual
    Ingeniería | 1500
    Administración | 1000
    Medicina | 2000

    Pero tiene un descuento especial según el promedio ponderado obtenido de todos sus cursos que han llevado, según la siguiente tabla:

    Promedio Ponderado | Descuento (%) sobre el pago mensual
    0 – 10 | 0%
    11 – 14 | 5%
    15 – 18 | 10%
    Mas de 18 | 100%

    Calcule el importe a pagar por el alumno.

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
39
Proceso DescuentoPorPromedioPonderado
    Escribir Sin Saltar "Ingresa el valor de promedio ponderado:";
    Leer promedio_ponderado;
    descuento <- 0;
    pago_mensual <- 0;
    Escribir "Selecciona el valor de carrera.";
    Escribir "    1.- Ingeniería";
    Escribir "    2.- Administración";
    Escribir "    3.- Medicina";
    Escribir Sin Saltar "    :";
    Repetir
        Leer carrera;
        Si carrera<1 O carrera>3 Entonces
            Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
        FinSi
    Hasta Que carrera>=1 Y carrera<=3;
    Si carrera = 1 Entonces
        pago_mensual <- 1500;
    FinSi
    Si carrera = 2 Entonces
        pago_mensual <- 1000;
    FinSi
    Si carrera = 3 Entonces
        pago_mensual <- 2000;
    FinSi
    Si promedio_ponderado>=11 Y promedio_ponderado<15 Entonces
        descuento <- pago_mensual*0.05;
    FinSi
    Si promedio_ponderado>=15 Y promedio_ponderado<18 Entonces
        descuento <- pago_mensual*0.1;
    FinSi
    Si promedio_ponderado>=18 Entonces
        descuento <- pago_mensual;
    FinSi
    importe_a_pagar <- pago_mensual-descuento;
    Escribir "Valor de descuento: ", descuento;
    Escribir "Valor de importe a pagar: ", importe_a_pagar;
    Escribir "Valor de pago mensual: ", pago_mensual;
FinProceso