import Control.Monad
main = do
    [n,x,y] <- map read . words <$> getLine
    let d i j = minimum [abs (j-i), abs (x-i) + abs (j-y) + 1, abs (y-i) + abs (j-x) + 1]
        count k = length [()| i <- [1..n-1], j <- [i+1..n], d i j == k]
    mapM_ print $ map count [1..n-1]