Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;Autor: Jose david Suarez
- ;fecha:07/12/20
- ;contrato:resta2: a,b->numero
- ;funcion: esta funcion suma a y b
- ;Ejemplos (resta2 5 4)->1 (resta 10 5)->5
- (define(resta2 a b )(- a b))
- ;pruebas
- (check-expect (resta2 5 4)1)
- ;Autor: Jose david Suarez
- ;fecha:07/12/20
- ;contrato:Multiplicacion5: a , b->numero
- ;funcion: esta funcion multiplica a y b
- ;ejemplo: (multiplicacion5 5 2 4 5 3 5)->600
- (define(multiplicacion5 x y z w n )(* x y z w n))
- ;pruebas
- (check-expect (multiplicacion5 2 4 5 3 5)600)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement