ANALISIS DE SISTEMAS

entero monto,presupuesto
caracter pediatria , ginecologia ,traumatologia
inicio
escriba "ingresar monto"
lea monto
si monto >1000 entonces
presupuesto<-(monto/100)*0.4
escriba " presupuesto anual para ginecologia ",presupuesto
llamar nueva_linea
presupuesto<-(monto/100)*0.3
escriba " presupuesto anual para traumatologia ",presupuesto
llamar nueva_linea
presupuesto<-(monto/100)*0.3
escriba "presupuesto anual para pediatria ",presupuesto
sino
escriba " ingrese en la proxima ejecucion un monto mayor a 1000 $"
fin si
fin