Algoritmo Ejercicio43

Algoritmo Ejercicio43

Var

Entero: CV;

Real: PV, DES, MI, MT, MF, Prima, PagoMes;

Cadena: Marca;

Inicio

Escribir("Ingrese la marca de el vehículo")

Leer (Marca)

Escribir ("Ingrese la cantidad de vehículos a comprar")

Leer (CV)

Escribir ("Ingrese el precio unitario del vehículo")

Leer (PV)

Si ( CV > 0 y PV > 0) entonces

MI = CV * PV

Segun sea (Marca) Hacer

Caso "Toyota":

DES = MI * 0.10

Caso "Nissan":

DES = MI * 0.08

Caso "Mazda":

DES = MI * 0.04

De otra forma:

Escribir ("Marca no válida")

FinSegun

MT = MI - DES

Si ( MT = 100000) entonces

Prima = MT * 0.35

PagoMes = (MT - Prima)/24;

Escribir "Valor de las cuotas a pagar durante 24 meses: $", PagoMes;

Sino

Si (MT > 100000) ENTONCES

Prima = MT * 0.25

PagoMes = (MT - Prima)/18;

Escribir "Valor de las cuotas a pagar durante 18 meses: $", PagoMes;

FinSi

FinSi

MF = MT - Prima;

Escribir ("Cantidad de vehículos:" & CV)

Escribir ("El precio por vehículo es: $" & PV)

...