;; in-0-to-100 : num -> sym
;;  Returns 'in if n is between 0 and 100 inclusive,
;;  'out otherwise
(define (in-0-to-100 n)
  (cond
   [(and (> n 0) (< n 100)) 'in]
   [else 'out]))
;; The first two examples are needed to check the two
;; categories indicated in the problem statement:
(in-0-to-100 50) "should be" 'in
(in-0-to-100 100) "should be" 'out
;; Note that the above examples also cover the possible
;; results. But we still have a boundary case to consider:
(in-0-to-100 0) "should be" 'out
;; And one more side of a boundary:
(in-0-to-100 -50) "should be" 'out


;; Also: use the stepper on the expressions at the end of
;; the lecture slides.