import Text.Printf (printf) series :: Integral a => a -> Double series n = 4 * 0.75 ** (fromIntegral n) main :: IO () main = printf "%.15f\n" . series =<< readLn