(define l (-(read) (/ 1 10000)))
(define k (read))
(define z (quotient l (* 2 k)))
(print (* k z))