Для целочисленного массива A[1..5] выяснить, является ли сумма его элементов четным числом. Вывести "ДА" или "НЕТ".
Answers & Comments
kage1998
Program gt; var a:array[1..1000]of integer ;i,n,s:longint; begin read(n); for i:=1 to n do begin read(a[i]); s:=s+a[i]; end; if(s mod 2=0)then writeln('YES')else write('NO'); end.
Answers & Comments
var a:array[1..1000]of integer
;i,n,s:longint;
begin
read(n);
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
if(s mod 2=0)then writeln('YES')else write('NO');
end.