Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; Alejandro Roldan
- ; fecha: 10 septiembre del 2018
- ; contrato edad : numero numero --> simbolo
- ; proposito: este programa recibe un numero lo compara con otro y retorna su diferencia
- ;;ejemplo: (chequear-numeros 2 3 --> 'pequeño)
- (define (chequear-numeros a b)
- (cond
- [(= a b) 'iqual ]
- [(and (< 0 (abs (- a b))) (>= 999 (abs (- a b )))) 'small]
- [else 'lots]
- ))
- ;;pruebas
- (check-expect (chequear-numeros 1 14)'small)
- (check-expect (chequear-numeros 1 140000)'lots)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement