-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Dependiendo del número de copias que el cliente pida, las cuotas se manejarán de la siguiente manera.
I. Las primeras 50 copias siempre costarán ¢50 cada una.
II. A partir de la copia 51 y hasta la 100, costarán ¢20 cada una.
III. Si son más de 100 copias, el excedente costara ¢10 cada una.
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 CuotaPorNumeroDeCopias
Escribir Sin Saltar "Ingresa el valor de numero de copias:";
Leer numero_de_copias;
cuota <- 0;
Si numero_de_copias<=50 Entonces
cuota <- 0.5*numero_de_copias;
FinSi
Si numero_de_copias>50 Y numero_de_copias<=100 Entonces
cuota <- 0.5*50+0.2*(numero_de_copias-50);
FinSi
Si numero_de_copias>100 Entonces
cuota <- 0.5*50+0.2*50+0.1*(numero_de_copias-100);
FinSi
Escribir "Valor de cuota: ", cuota;
FinProceso
Escribir Sin Saltar "Ingresa el valor de numero de copias:";
Leer numero_de_copias;
cuota <- 0;
Si numero_de_copias<=50 Entonces
cuota <- 0.5*numero_de_copias;
FinSi
Si numero_de_copias>50 Y numero_de_copias<=100 Entonces
cuota <- 0.5*50+0.2*(numero_de_copias-50);
FinSi
Si numero_de_copias>100 Entonces
cuota <- 0.5*50+0.2*50+0.1*(numero_de_copias-100);
FinSi
Escribir "Valor de cuota: ", cuota;
FinProceso