let [| m; d |] = stdin.ReadLine().Split(' ') |> Array.map int
let mutable acc = 0
for m' = 1 to m do
    for d' = 1 to d do
        let ( d10, d1 ) = d'/10, d'%10
        if d1 >= 2 && d10 >=2 && d10 * d1 = m' then 
            acc <- acc + 1
printfn "%d" acc