s = gets.chomp
n = s.to_i
len = s.size

ans = 0
1.upto(len){|tlen|
  (3**tlen).times{|i|
    tmp = (3**tlen+i).to_s(3)[1..-1].chars.map{|c|[3,5,7][c.to_i]}*""
    if tmp.to_i<=n && [?3,?5,?7].map{|x|tmp.count(x)>=1}.all?
      ans += 1
    end
  }
}
p ans