(define (judge l m n)
  (let* ((ans 0))
    (begin
      (receive (a b) (divrem n 25) (set! ans (+ ans b))
      (receive (c d) (divrem (* (+ m a) 25) 100) (set! ans (+ ans (quotient d 25)))
      (receive (e f) (divrem (* (+ l c) 100) 1000) (set! ans (+ ans (quotient f 100))))))
      (print ans))))

(define (divrem n m)
  (values (quotient n m) (remainder n m)))

(define (main args)
  (judge (read) (read) (read)) 0)