Usuario:Daniel Mendoza:DrScheme:Ejercicio 3.1.3
Apariencia
; 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)