Для
целочисленного массива A[1..5] выяснить, является ли сумма его элементов четным
числом. Вывести "ДА" или "НЕТ".

program gt;var a:array[1..1000]of integer;i,n,s:longint;beginread(n);for i:=1 to n dobeginread(a[i]);s:=s+a[i];end;if(s mod 2=0)then writeln('YES')else write('NO');end.