CARVIEW |
Select Language
HTTP/2 200
date: Sun, 12 Oct 2025 08:44:59 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=7d6c2c7e115cdd5a0aa53937587ef6c51c607bc7e2bfe2f443a250131b224919a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22UMetC_uEkazCWOaZ_aFgvkSDazZNr8Fw%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d551876c98c177-BLR
(define lista1 (list 'a 'b (list 'ab 'c 'd) 'p 'o))(define (buscar-simbolo - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (define lista1 (list 'a 'b (list 'ab 'c 'd) 'p 'o))
- (define (buscar-simbolo lista simbolo)
- (cond
- [(not (and (list? lista) (symbol? simbolo)))
- (error "El primer elemento debe ser una lista y el segundo un simbolo a buscar")
- ]
- [(empty? lista) #F]
- [(list? (first lista))
- (or (equal? simbolo (buscar-simbolo lista (first lista)))
- (equal? simbolo (buscar-simbolo lista (rest lista)))
- )]
- [else
- (or (equal? (first lista) simbolo)
- (buscar-simbolo lista (rest lista))
- )]
- )
- )
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐⭐⭐Profit Method⭐⭐
Java | 0 sec ago | 0.10 KB
-
⭐✅ Swapzone Glitch ✅ Working ⭐⭐ P
JavaScript | 2 min ago | 0.25 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ Z
JavaScript | 2 min ago | 0.25 KB
-
⭐⭐⭐Instant Profit Method⭐⭐
Java | 6 min ago | 0.10 KB
-
⭐⭐⭐Free Giftcards Method⭐⭐
Java | 6 min ago | 0.10 KB
-
⭐✅ Swapzone Glitch ✅ Working ⭐⭐ U
JavaScript | 6 min ago | 0.25 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ Z
JavaScript | 6 min ago | 0.25 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ V
JavaScript | 6 min ago | 0.25 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