Advertisement
Guest User

Untitled

a guest
Jun 6th, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Racket 0.18 KB | None | 0 0
  1. (define (najmniejszy l)
  2.     (if (null? l)
  3.         #f
  4.         (if (null? (cdr l))
  5.             (car l)
  6.             (if (< (car l)(cadr l))
  7.                 (najmniejszy (cons(car l)(cddr l)))
  8.                 (najmniejszy (cdr l))))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement