import Data.List

main = do
  [a,b,k] <- map read.words <$> getLine
  let nums
       | b-a+1 <= 2*k  = [a..b]
       | otherwise     = ns ++ ns'
       where (ns, ms) = splitAt k [a..b]
             ns'     = drop (length ms - k) ms 
  mapM_ print nums