-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
El dueño de una empresa desea planificar las decisiones financieras que tomara en el siguiente año.
La manera de planificarlas depende de lo siguiente:
- Si actualmente su capital se encuentra con saldo negativo, pedirá un préstamo bancario para que su nuevo saldo sea de L. 50,000.
- Si su capital tiene actualmente un saldo positivo pedirá un préstamo bancario para tener un nuevo saldo de L. 120,000.
- Si su capital tiene actualmente un saldo superior a los L. 120,000 no pedirá ningún préstamo.
Posteriormente repartirá su presupuesto de la siguiente manera:
- L. 50,000 para equipo de computo
- L. 20,000 para mobiliario
y el resto la mitad será para la compra de insumos y la otra para otorgar incentivos al personal.
Desplegar que cantidades se destinaran para la compra de insumos e incentivos al personal y, en caso de que fuera necesario, a cuánto ascendería la cantidad que se pediría al banco.
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
Escribir Sin Saltar "Ingresa el valor de capital:";
Leer capital;
prestamo_bancario <- 0;
presupuesto <- 0;
presupuesto_equipo_computo <- 50000;
presupuesto_mobiliario <- 0;
Si capital<0 Entonces
prestamo_bancario <- 50000.0-capital;
presupuesto <- 50000;
FinSi
Si capital>=0 Y capital<120000 Entonces
prestamo_bancario <- 120000.0-capital;
presupuesto <- 120000;
presupuesto_mobiliario <- 20000;
FinSi
Si capital>=120000 Entonces
presupuesto <- capital;
presupuesto_mobiliario <- 20000;
FinSi
presupuesto_insumos <- (presupuesto-presupuesto_equipo_computo-presupuesto_mobiliario)/2;
presupuesto_incentivos <- presupuesto_insumos;
Escribir "Valor de prestamo bancario: ", prestamo_bancario;
Escribir "Valor de presupuesto: ", presupuesto;
Escribir "Valor de presupuesto equipo computo: ", presupuesto_equipo_computo;
Escribir "Valor de presupuesto incentivos: ", presupuesto_incentivos;
Escribir "Valor de presupuesto insumos: ", presupuesto_insumos;
Escribir "Valor de presupuesto mobiliario: ", presupuesto_mobiliario;
FinProceso