--AOJ Circle

import Control.Applicative

fInt :: String -> Float
fInt str = read str :: Float

pi' :: Float
pi' = 3.14

main :: IO ()
main = do
  r <- pure fInt <*> getLine
  putStrLn $ show (pi * r * r)  ++ " " ++  show (2 * pi * r) 