Usuario:Pilonieta:Heuristica:DrScheme:Ejercicio 3.1.3

;Determinar la ganancia que el propietario del cine hace con $3.00,$4.00 y $5.00 usando las 

;definiciones del programa en dos columnas.

; Con "How to design programs:

; 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))))

(ganancia 3.00)

(ganancia 4.00)

(ganancia 5.00)

; Con How not to design programs:

; GANANCIA : número  ->  número
; determina la ganancia y recibe el precio del tiquete
; (define (GANANCIA precio) ...)

(define (GANANCIA precio) (- (* (+ 120(* (/ 15 .10)(- 5.00 precio)))precio)(+ 180(* .04(+ 120(* (/ 15 .10)(- 5.00 precio)))))))

(GANANCIA 3.00)

(GANANCIA 4.00)

(GANANCIA 5.00)

Version Python