Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (define min-max
- (lambda (l)
- (if (null? cdr(l))
- (car(l) car(l))
- (if car(l) > car(cdr(min-max(cdr(l))))
- (car(min-max(cdr(l))) car(l))
- (if car(l) < car(min-max(cdr(l)))
- (car(l) car(cdr(min-max(cdr(l)))))
- )))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement