require 'set'

$buf = []
def fill_buf; (s = gets) ? $buf = s.chomp.split : break while $buf.empty? end
def has_next; fill_buf; !$buf.empty? end
def get; fill_buf; $buf.shift end
def geti; get.to_i end
def getf; get.to_f end
def getss(n = nil); n ? Array.new(n) { get } : begin fill_buf; $buf.shift(1e9) end; end
def getis(n = nil); get_ss(n).map(&:to_i) end
def getfs(n = nil); get_ss(n).map(&:to_f) end


while has_next
  n = geti
  cand = Set.new
  u = Math.sqrt(n+1).to_i
  (1..u).select { |k| n % k == 0 }.each do |k|
    cand << "#{k}#{n/k}"
    cand << "#{n/k}#{n}" if k*k != n
  end
  # p cand
  p cand.size
end