Usuario:Pilonieta:Heuristica:DrScheme:Ejercicio 3.1.2

De Wikilibros, la colección de libros de texto de contenido libre.
; Ejercicio 3.1.2. Usa los resultados del ejercicio 3.1.1. para determinar el costo de 

;un show de $3.00, $4.00 y $5.00. También determina los ingresos que cada show produce

;con esos precios. Finalmente, calcula cuál es la ganancia en cada show. ¿Cuál es el 

;mejor precio para maximizar la ganancia?
; ganancia : número  ->  número
; determina la ganancia como la diferencia entre ingresos y costos, recibiendo el precio

; del tiquete
; (define (ganancia precio-tiquete) ...)
; ingresos: número  ->  número
; calcula los ingresos a partir del precio del tiquete
; (define (ingresos precio-tiquete) ...)
; costo : número  ->  número
; obtiene el costo mediante el precio del tiquete
; (define (costo precio-tiquete) ...)
; asistentes : número  ->  número
; determina el número de asistentes y recibe el precio del tiquete
; (define (asistentes precio-tiquete) ...)


(define (ganancia precio-tiquete) (- (ingresos precio-tiquete) (costo precio-tiquete)))

(define (ingresos precio-tiquete) (* (asistentes precio-tiquete) precio-tiquete))

(define (costo precio-tiquete) (+ 180(* .04 (asistentes precio-tiquete))))

(define (asistentes precio-tiquete) (+ 120(* (/ 15 .10) (- 5.00 precio-tiquete))))

(costo 3.00) (costo 4.00) (costo 5.00)

(ingresos 3.00) (ingresos 4.00) (ingresos 5.00)

(ganancia 3.00) (ganancia 4.00) (ganancia 5.00)

; Para maximizar la ganancia del teatro el mejor precio del tiquete es $3.00, y la 
; ganancia $1063.2

Version Python