module Main where

import Numeric
import Data.Functor

main :: IO ()
main =  do
  { [a,b] <- getInts
  ; putStrLn $ unwords $[show$a`div`b,show$a`mod`b,showFFloat Nothing (fromIntegral a/fromIntegral b :: Double) ""]
  }

getInts :: IO [Int]
getInts = map read . words <$> getLine