import Text.Printf

ft (s, l) =
    printf "%F %F\n" s l

circle :: [Int] -> (Float, Float)
circle (r:_) =
  ( pi * (fromIntegral r) * (fromIntegral r), 2.0 * pi * (fromIntegral r))

main = do
  r <- getLine
  putStrLn $ ft $ circle $ map (read :: String -> Int) $ words r