main :: IO ()
main = do
    d <- readLn
    putStr . (++ ".") . show $ d `div` 100 * 108
    print $ (d * 8) `mod` 100