-- Computation - Circle

import Text.Printf

main :: IO ()
main = do
  r <- readLn
  printf "%.6f %.6f\n" (area r) (circuit r)

area :: Double -> Double
area r = r * r * pi

circuit :: Double -> Double
circuit r = 2 * r * pi

