let () =
  Scanf.scanf "%d\n" @@ fun x ->
  let n, m = x / 100, n mod 100 in
  let rec search n m l =
    if n < 0 || l = 0 then print_int 0
    else if m = 0 then print_int 1
    else search (n-(m/l)) (m mod l) (l-1) in
  search n m 5
