(define (main args)
  (let1 ls (map string->number (string-split (read-line) #\/))
        (print (exact->inexact (/ (car ls) (cadr ls)))))
  0)