• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Una empresa de bienes raíces ofrece casas, bajo las siguientes condiciones:
    - Si los ingresos del comprador son de $2.000.000 o más el anticipo será del 35% del costo de la casa y el resto se distribuirá en pagos mensuales, a pagar en 7 años.
    - Si los ingresos del comprador son menores, el anticipo será del 20% del costo de la casa y el resto se distribuirá en pagos mensuales a pagar en 15 años.
    La empresa quiere contar con un programa que indique cuanto debe pagar un comprador por concepto de anticipo y cuánto por cada pago mensual. El programa solo solicitará por teclado el valor de la casa y el valor de los ingresos mensuales del comprador.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Proceso EmpresaDeBienesRaices
    Escribir Sin Saltar "Ingresa el valor de costo de la casa:";
    Leer costo_de_la_casa;
    Escribir Sin Saltar "Ingresa el valor de ingresos:";
    Leer ingresos;
    Si ingresos>2000000 Entonces
        anticipo <- costo_de_la_casa*0.35;
        pagos <- 7*12;
    SiNo
        anticipo <- costo_de_la_casa*0.2;
        pagos <- 15*12;
    FinSi
    pago_mensual <- (costo_de_la_casa-anticipo)/pagos;
    Escribir "Valor de anticipo: ", anticipo;
    Escribir "Valor de pago mensual: ", pago_mensual;
    Escribir "Valor de pagos: ", pagos;
FinProceso