def yakusu(n)
    res = []
    (1..n).each do |i|
        res << i if n % i == 0
    end
    res
end
def build_kakezan(yakusu)
    max = yakusu.length / 2
    i = 0
    j = yakusu.length - 1
    res = []
    until i == max
        res << [yakusu[i],yakusu[j]]
        i += 1
        j -= 1
    end
    res << [yakusu[max],yakusu[max]]  if yakusu.length % 2 != 0
    res
end
n = gets.chomp.to_i
res = []
build_kakezan(yakusu(n)).each do |k|
    s1 = "#{k[0]}#{k[1]}"
    s2 = "#{k[1]}#{k[0]}"
    res << s1 if not res.include?(s1)
    res << s2 if not res.include?(s2)
end
puts res.length