--AOJ Circle

import Control.Applicative
import Text.Printf

rDouble :: String -> Double
rDouble str = read str :: Double

main :: IO ()
main = do
  r <- pure rDouble <*> getLine
  printf "%.6f %.6f\n" (pi * r * r) (2 * pi * r) 