module Main where import qualified Data.ByteString.Char8 as BS import Data.Char import Data.String import Data.List import Data.Maybe import Control.Monad main :: IO () main = do [_, h] <- map (fst . fromJust . BS.readInteger) . BS.words <$> BS.getLine t <- map (fst . fromJust . BS.readInteger) . BS.words <$> BS.getLine putStrLn . unwords $ map (\i -> show $ i + h) t