def build_str(i,j)
    res = []
    a = [i,j].sort
    res << "#{a[0]}#{a[1]}"
    res << "#{a[1]}#{a[0]}"
    res
end
res = []
max = gets.chomp.to_i
(1..max).each do |i|
    (1..max).each do |j|
        if i * j == max
            strs = build_str(i,j)
            strs.each do |s|
                if not res.include?(s)
                    res << s
                end
            end
        end
    end
end

puts res.length