let () = Scanf.scanf "%d\n" @@ fun x ->
  let dp = Array.make (x + 106) false in
  dp.(0) <- true;
  for i = 0 to x do
    if dp.(i) then begin
      dp.(i + 100) <- true;
      dp.(i + 101) <- true;
      dp.(i + 102) <- true;
      dp.(i + 103) <- true;
      dp.(i + 104) <- true;
      dp.(i + 105) <- true;
    end
  done;
  print_endline @@
  if dp.(x) then "1" else "0"
