-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Se requiere un programa para facturar llamadas telefónicas. El valor del minuto depende del tipo de llamada, así: local = $ 50, regional = 100, larga distancia nacional = 500, larga distancia internacional = 700, a celular = 200. Las llamadas de tipo regional y larga distancia nacional tienen un descuento del 5% si su duración es de 5 minutos o más.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Proceso FacturacionDeLlamadasTelefonicas
Escribir Sin Saltar "Ingresa el valor de minutos de llamada a celular:";
Leer minutos_de_llamada_a_celular;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada larga distancia internacional:";
Leer minutos_de_llamada_larga_distancia_internacional;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada larga distancia nacional:";
Leer minutos_de_llamada_larga_distancia_nacional;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada local:";
Leer minutos_de_llamada_local;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada regional:";
Leer minutos_de_llamada_regional;
subtotal <- minutos_de_llamada_local*50+minutos_de_llamada_regional*100+minutos_de_llamada_larga_distancia_nacional*500+minutos_de_llamada_larga_distancia_internacional*700+minutos_de_llamada_a_celular*200;
descuento <- 0;
Si minutos_de_llamada_regional>5 Entonces
descuento <- descuento+minutos_de_llamada_regional*5;
FinSi
Si minutos_de_llamada_larga_distancia_nacional>5 Entonces
descuento <- descuento+minutos_de_llamada_larga_distancia_nacional*25;
FinSi
total <- subtotal-descuento;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de subtotal: ", subtotal;
Escribir "Valor de total: ", total;
FinProceso
Escribir Sin Saltar "Ingresa el valor de minutos de llamada a celular:";
Leer minutos_de_llamada_a_celular;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada larga distancia internacional:";
Leer minutos_de_llamada_larga_distancia_internacional;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada larga distancia nacional:";
Leer minutos_de_llamada_larga_distancia_nacional;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada local:";
Leer minutos_de_llamada_local;
Escribir Sin Saltar "Ingresa el valor de minutos de llamada regional:";
Leer minutos_de_llamada_regional;
subtotal <- minutos_de_llamada_local*50+minutos_de_llamada_regional*100+minutos_de_llamada_larga_distancia_nacional*500+minutos_de_llamada_larga_distancia_internacional*700+minutos_de_llamada_a_celular*200;
descuento <- 0;
Si minutos_de_llamada_regional>5 Entonces
descuento <- descuento+minutos_de_llamada_regional*5;
FinSi
Si minutos_de_llamada_larga_distancia_nacional>5 Entonces
descuento <- descuento+minutos_de_llamada_larga_distancia_nacional*25;
FinSi
total <- subtotal-descuento;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de subtotal: ", subtotal;
Escribir "Valor de total: ", total;
FinProceso