import Control.Applicative

main = do
  [x,y] <- map read . words <$> getLine
  putStrLn . toString . calc $ (x,y)


calc :: (Integer,Integer) -> (Integer,Integer,Float)
calc (x,y) = (div x y,rem x y,fromInteger x / fromInteger y)

toString :: (Integer,Integer,Float) -> String
toString (x,y,z) = show x ++ " " ++ show y ++ " " ++ show z