-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
La empresa proveedora de agua potable "Sedapal" facturará S/. 1 x m³ para consumos inferiores a 100 m³, S/. 1.5 x m³ para consumos de 100 hasta 500 m³ y S/. 2 x m³ para consumos superiores a 500 m³. Hallar importe a pagar.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Proceso Sedapal
Escribir Sin Saltar "Ingresa el valor de consumo en m3:";
Leer consumo_en_m3;
importe_a_pagar <- 0;
Si consumo_en_m3<100 Entonces
importe_a_pagar <- consumo_en_m3;
FinSi
Si consumo_en_m3>=100 Y consumo_en_m3<=500 Entonces
importe_a_pagar <- 100.0+(consumo_en_m3-100)*1.5;
FinSi
Si consumo_en_m3>500 Entonces
importe_a_pagar <- 100.0+1.5*400+(consumo_en_m3-500)*2;
FinSi
Escribir "Valor de importe a pagar: ", importe_a_pagar;
FinProceso
Escribir Sin Saltar "Ingresa el valor de consumo en m3:";
Leer consumo_en_m3;
importe_a_pagar <- 0;
Si consumo_en_m3<100 Entonces
importe_a_pagar <- consumo_en_m3;
FinSi
Si consumo_en_m3>=100 Y consumo_en_m3<=500 Entonces
importe_a_pagar <- 100.0+(consumo_en_m3-100)*1.5;
FinSi
Si consumo_en_m3>500 Entonces
importe_a_pagar <- 100.0+1.5*400+(consumo_en_m3-500)*2;
FinSi
Escribir "Valor de importe a pagar: ", importe_a_pagar;
FinProceso