main = getLine >>=
        \l -> let a:b:_ = map read . words $ l
              in let resDiv = (fromIntegral a) `div` (fromIntegral b)
                     resMod = (fromIntegral a) `mod` (fromIntegral b)
                     resDivF = (fromIntegral a) / (fromIntegral b) :: Double
                 in putStr $ show resDiv ++ " " ++ show resMod ++ " " ++ show resDivF