import Data.Fixed
main = do
  line <- getLine
  let 
    [a,b] = map read $ words line :: [Int]
    in do 
      putStrLn $ (show $ div a b) ++ " " ++ (show $ mod a b) ++ " " ++ (show $ (read $ show a :: Micro) / (read $ show b :: Micro))

