import Control.Applicative
import Data.List
 
main = do
  [n, a, b] <- map read . words <$> getLine
  putStr . read $ f n a b
 
f :: Int -> Int -> Int -> Int
f n a b
  | n <= 0 = 0
  | n == 1 && a /= b = 0
  | a > b = 0
  | otherwise = g n a b
 
g :: Int -> Int -> Int -> Int
g n a b = length $ h n a b
 
h :: Int -> Int -> Int -> [Int]
h 1 a b = [a .. b]
h n a b = nub $ (*) <$> [a .. b] <*> h (n-1) a b