Scanf.scanf "%d %d %d" (fun n m s -> let a = Array.init n (fun _ -> Scanf.scanf " %d" (fun a -> a)) in let sum = Array.fold_left (+) 0 a in print_endline @@ if sum mod m = s mod m then "Yes" else "No" )