dp = Array.new(1001){Array.new(10){0}}
dp[0][0] = 1

0.upto(100){|i|
  1000.downto(i){|j|
    9.downto(1){|k|
      dp[j][k] += dp[j-i][k-1] 
    }
  }
}

readlines.each{|line|
  n, s = line.split.map(&:to_i)
  break if n == 0 && s == 0
  puts dp[s][n]
}