| CARVIEW |
Select Language
HTTP/2 200
date: Sun, 12 Oct 2025 21:52:12 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=a8fb449102bbf97091bfed90972cbd0330f11f500eb704ad10a8d8d279a21b80a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22hFiGbI8Zyao1bztcLg8zlNq0lrxUcE6g%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d9d2ad1b065ace-BLR
Ejercicio Reto - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;; Autor: Juan Felipe Jaramillo
- ;; Fecha de creación: 8 de julio de 2020
- ;; Contrato: calcularPiezasRealizadas número, número -> número
- ;; Descripción: Esta función calcula la cantidad de piezas que se realizan en una compañía de acuerdo al horario que se provea.
- ;; Ejemplos:(calcularPiezasRealizadas 5 17), retorna 303
- ;; Definición:
- (define (calcularPiezasRealizadas x y) (cond
- [(<= x 10) (cond
- [(and (<= y 10) (> y x) ) (produccion_0-10 (- y x) ) ]
- [(and (<= y 10) (< y x) ) (+(produccion_0-10 (- 10 x) ) (produccion_10-16 6) (produccion_16-24 8) (produccion_0-10 y ) ) ]
- [(and (>= y 10) (<= y 16) ) (+ (produccion_0-10 (- 10 x) ) (produccion_10-16 (- y 10) ) ) ]
- [else (+ (produccion_0-10 (- 10 x)) (produccion_10-16 6) (produccion_16-24 (- y 16 ) ) ) ]
- )]
- [(and (<= x 16) (> x 10) ) (cond
- [ (and (<= y 16) (> y x)) (produccion_10-16 (- y x) ) ]
- [ (and (<= y 24) (>= y x) (> y 16) ) (+ (produccion_10-16 (- 16 x) ) (produccion_16-24 (- y 16) ) ) ]
- [ (and (<= y 24) (>= y x) (< y 16) ) (produccion_10-16 (- y x) ) ]
- [ (and (<= y 16) (< y x)) (+ (produccion_10-16 (- 16 x) ) (produccion_16-24 8 ) (produccion_0-10 y) ) ]
- )]
- [else (cond
- [ (and (> y x) (<= y 24) ) (produccion_16-24 (- y x) ) ]
- [ (and (< y x) (<= y 24) ) (+ (produccion_16-24 (- 24 x) ) (produccion_0-10 10) (produccion_10-16 6) (produccion_16-24 (- y 16) ) ) ]
- [ (and (< y 10) (>= y 0) ) (+ (produccion_16-24 (- 24 x) ) (produccion_0-10 y) ) ]
- [ (and(< y 16) (>= y 10) ) (+ (produccion_16-24 (- 24 x) ) (produccion_0-10 10) (produccion_10-16 (- y 10) ) ) ]
- ) ]
- ) )
- ;; Autor: Juan Felipe Jaramillo
- ;; Fecha de creación: 8 de julio de 2020
- ;; Contrato: calcularPiezasRealizadas número -> número
- ;; Definición:
- (define (produccion_0-10 x) (* x 25) )
- ;; Autor: Juan Felipe Jaramillo
- ;; Fecha de creación: 8 de julio de 2020
- ;; Contrato: calcularPiezasRealizadas número -> número
- ;; Definición:
- (define (produccion_10-16 x) (* x 28) )
- ;; Autor: Juan Felipe Jaramillo
- ;; Fecha de creación: 8 de julio de 2020
- ;; Contrato: calcularPiezasRealizadas número -> número
- ;; Definición:
- (define (produccion_16-24 x) (* x 10) )
- ;;Pruebas:
- (check-expect (calcularPiezasRealizadas 5 17) 303 )
Advertisement
Add Comment
Please, Sign In to add comment
-
💡 Instant BTC Profit Method ✅ Working
JavaScript | 5 sec ago | 0.24 KB
-
📝 MAKE $2500 IN 15 MIN ✅ Working
JavaScript | 14 sec ago | 0.24 KB
-
🚀 Swapzone +37% glitch
JavaScript | 24 sec ago | 0.24 KB
-
⚡ Crypto Swap Glitch ✅ Working ⚡
JavaScript | 34 sec ago | 0.24 KB
-
💎 ChangeNOW Exploit
JavaScript | 49 sec ago | 0.24 KB
-
🚨 Free Crypto Method 🚨
JavaScript | 58 sec ago | 0.24 KB
-
⭐⭐⭐ChangeNOW Exploit⭐⭐
Java | 1 min ago | 0.15 KB
-
💡 EASY MONEY GUIDE ✅ Working
JavaScript | 1 min ago | 0.24 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
