-
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
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
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