import Data.Int (Int32)

countLecs :: Integral a => a -> a -> [a] -> Int
countLecs a b = length . filter (\t -> t < a || b <= t)

main :: IO ()
main = do
    [_, a, b] <- fmap read . words <$> getLine :: IO [Int32]
    ts <- fmap read . lines <$> getContents :: IO [Int32]
    print $ countLecs a b ts
