main :: IO ()
main = do
  n <- readLn :: IO Int
  print $ 4.0 * (0.75 ^ n)