| CARVIEW |
Select Language
HTTP/2 200
date: Sat, 11 Oct 2025 06:14:58 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=671788316d9333727c596a0daa4d90519b7c57f650d78b8799942606b5d0477ea%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22R6P8vuTrHAE0r8Xz__gvSTHzhY80eQzv%22%3B%7D; HttpOnly; Path=/
cf-ray: 98cc38640d8ab155-BLR
Ejemplo3FDP01Feb - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;.
- ;;Autor: Carlos A Delgado
- ;;Fecha: 01 de Feb de 2021
- ;;Contrato: funcion: numero,numero -> numero
- ;;Descripción: Esta función implementa una función a trozos
- ;;Ejemplos
- ;; x = 0 y = 0 8
- ;; x = 4 y = 0 16
- ;; x = -7 y = 0 #i1.150163316895603+1.150163316895603i
- ;; x = 0 y = -4 4
- ;; x = 0 y = 8 0
- (define (funcion x y)
- (cond
- [(not (and (number? x) (number? y))) (error "los argumentos deben ser números")]
- [(and (= x 0) (= y 0)) 8]
- [(and (> x 0) (= y 0)) (+ (sqr x) (* 2 y))]
- [(and (< x 0) (= y 0)) (+ (sqr y) (expt x 1/4))]
- [(and (= x 0) (< y 0)) (sqrt (+ (sqr x) (sqr y)))]
- [else (expt (/ (sqr x) (+ (sqr x) (sqr y) )) 1/3)]
- ))
- (check-expect (funcion 0 0) 8)
- (check-expect (funcion 4 0) 16)
- (check-within (funcion -7 0) 1.15+1.15i 0.01)
- (check-expect (funcion 0 -4) 4)
- (check-expect (funcion 0 8) 0)
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐✅ Trading Profit Method ✅ NEVER SEEN BEFORE...
JavaScript | 4 sec ago | 0.24 KB
-
⭐ Instant BTC Profit Method ✅ NEVER SEEN BEFO...
JavaScript | 13 sec ago | 0.24 KB
-
⭐✅ MAKE $2000 INSTANTLY ✅ NEVER SEEN BEFORE ⭐...
JavaScript | 23 sec ago | 0.24 KB
-
⭐ Free Crypto Method ✅ NEVER SEEN BEFORE ⭐⭐⭐
JavaScript | 34 sec ago | 0.24 KB
-
✅⭐ Make huge profits on trading ✅ NEVER SEEN...
JavaScript | 45 sec ago | 0.24 KB
-
⭐✅ Marketplace Glitch ✅ Working ✅ NEVER SEEN...
JavaScript | 54 sec ago | 0.24 KB
-
✅⭐ Make $2500 in 15 minutes ✅ NEVER SEEN BEFO...
JavaScript | 1 min ago | 0.24 KB
-
⭐ Instant BTC Profit Method ✅ NEVER SEEN BEFO...
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
