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