solve :: Double -> Double
solve n = n * 3.5

main = do
        n <- fmap read getLine
        print $ solve n