module Main where

import Control.Applicative
import Control.Monad
import Data.List
import Text.Printf

main :: IO ()
main = do
  [a,b]<-map (read::String->Int).words<$>getLine
  let dbl = fromIntegral a / fromIntegral b :: Double
  putStrLn . unwords $ [show (a`div`b), show (a`mod`b), show dbl]