let () =
	let n = read_int () in (* n is not used *)
	let a =
		read_line ()
		|> Str.split (Str.regexp " ")
		|> List.map int_of_string
	in
	let count_odd lst =
		List.filter (fun i -> i mod 2 = 1) lst
		|> List.length
	in
	if count_odd a mod 2 = 0 then
		print_endline "YES"
	else
		print_endline "NO"
