import Control.Applicative
import Control.Monad
import Data.List
import Text.Printf
rInt s = read s :: Int
 
main = do
   r <- readLn
   putStrLn $ printf "%.8f %.8f" (pi * r ^ 2 :: Double) (2 * r * pi :: Double)