-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Una empresa quiere hacer una compra de varias piezas de la misma clase a una fábrica de refacciones y desea saber de acuerdo al valor total de las piezas que comprar: el valor que debe colocar en efectivo de su propia inversión, el valor que debe prestar al banco y el valor debe pagar para el caso que aplique un crédito con el fabricante. Si el valor total de la compra excede de $1’000,000 la empresa tendrá la capacidad de invertir de su propio dinero en efectivo un 55% del monto de la compra, pedir prestado al banco un 30% y el resto lo pagara solicitando un crédito al fabricante. Si el monto total de la compra no excede de $1’000,000 y es mayor a $500.000 la empresa tendrá capacidad de invertir de su propio dinero en efectivo un 70% y el restante 30% lo pagara solicitando crédito al fabricante; Y si el monto total de la compra no excede de $500,000 la empresa pone el 80% en efectivo y el 20% lo cancela con un crédito al banco. Tenga en cuenta que el fabricante cobra por concepto de intereses un 15% sobre el valor del crédito que se le solicite.
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Escribir Sin Saltar "Ingresa el valor de monto de la compra:";
Leer monto_de_la_compra;
Si monto_de_la_compra>1000000 Entonces
inversion_en_efectivo <- monto_de_la_compra*0.55;
prestamo_al_banco <- monto_de_la_compra*0.3;
FinSi
Si monto_de_la_compra<=1000000 Y monto_de_la_compra>500000 Entonces
inversion_en_efectivo <- monto_de_la_compra*0.7;
prestamo_al_banco <- 0.3;
FinSi
Si monto_de_la_compra<=500000 Entonces
inversion_en_efectivo <- monto_de_la_compra*0.8;
prestamo_al_banco <- 0.2;
FinSi
credito_con_el_fabricante <- monto_de_la_compra-inversion_en_efectivo-prestamo_al_banco;
intereses <- credito_con_el_fabricante*0.15;
total_de_las_piezas <- monto_de_la_compra+intereses;
Escribir "Valor de credito con el fabricante: ", credito_con_el_fabricante;
Escribir "Valor de intereses: ", intereses;
Escribir "Valor de inversion en efectivo: ", inversion_en_efectivo;
Escribir "Valor de prestamo al banco: ", prestamo_al_banco;
Escribir "Valor de total de las piezas: ", total_de_las_piezas;
FinProceso