(let [h (read) r (read)] (println (+ -8.245 (* 6.807 h) (* 7.073 Math/PI 2 r))))