$<.each{|line|
  n = line.to_i
  ret = 0
  10.times{|a|
    break if n < a
    if n == a
      ret+=1
      break
    end
    10.times{|b|
      break if n < a + b     
      if n == a + b 
        ret+=1
        break
      end
      10.times{|c|
        break if n < a + b + c
        if n == a + b + c 
          ret+=1
          break
        end
        10.times{|d|
          break if n < a + b + c + d
          if n == a + b + c + d
            ret+=1
            break
          end
        }
      }
    }
  }
  puts ret
}