-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Una empresa de servicios de comunicaciones por aniversario otorga a sus clientes megas para navegar por internet dentro de su planes actuales. Considerar que los clientes se encuentran en los siguientes planes:
Tipo de Plan
A
B
C
Los clientes que se encuentren en el plan A ó B, recibirán megas de acuerdo al tiempo de antigüedad como cliente, como se muestra en la tabla:
Tiempo antigüedad (años) | Megas otorgados
tiempo <= 4 | 20
4 < tiempo <= 10 | 30
10 < tiempo | 40
En el caso de los usuarios de plan C tendrán 10 megas otorgados. Considerar los datos de ingreso: nombre, tipo de plan, tiempo de antigüedad y cantidad actual de megas disponibles.
Se requiere calcular la cantidad actual de megas del cliente.
1. Ingreso de datos.
2. Cantidad de actual de megas .
3. Visualizar nombre, plan y cantidad actual de megas.
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
Escribir Sin Saltar "Ingresa el nombre:";
Leer nombre;
Escribir Sin Saltar "Ingresa el valor de antiguedad:";
Leer antiguedad;
megas <- 0;
Escribir "Selecciona el valor de plan.";
Escribir " 1.- A";
Escribir " 2.- B";
Escribir " 3.- C";
Escribir Sin Saltar " :";
Repetir
Leer plan;
Si plan<1 O plan>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que plan>=1 Y plan<=3;
Si plan = 1 Entonces
Escribir "Plan A";
FinSi
Si plan = 2 Entonces
Escribir "Plan B";
FinSi
Si plan = 3 Entonces
Escribir "Plan C";
megas <- 10;
FinSi
Si (plan = 1 O plan=2) Y antiguedad<=4 Entonces
megas <- 20;
FinSi
Si (plan = 1 O plan=2) Y antiguedad>4 Y antiguedad<=10 Entonces
megas <- 30;
FinSi
Si (plan = 1 O plan=2) Y antiguedad>10 Entonces
megas <- 40;
FinSi
Escribir "Nombre: ", nombre;
Escribir "Valor de megas: ", megas;
FinProceso