viernes, 22 de mayo de 2009

casa de interes social

Publicado por sergio aparicio

entero valor_casa,ingresos,p,m,s,d
cadena [30] nombre
inicio
escriba "ingresar valor de la casa a comprar "
lea valor_casa
escriba "ingresar el valor su sueldo mensual"
lea ingresos
si ingresos < 800000 entonces
p<-(valor_casa/100)*15
escriba " primer cuota de pago sera de",p
m<-(valor_casa-0.15)/120
escriba "valor mensual a pagar a diez anos sera de ",m
sino
si ingresos>= 800000 entonces
s<-(valor_casa/100)*30
escriba " primera cuota de pago sera de",s
d<-(valor_casa-0.3)/84
escriba " valor mensual a pagar a siete anos sera de ",d
sino
escriba " no sireve este malpario programa"
fin si
fin si
fin

0 comentarios:

Publicar un comentario