作业帮输入n(1
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/19 15:34:56
输入n(1
输入n(1
输入n(1
var n,x,i,s1,s2:longint;
begin
s1:=0; s2:=0;
for i:=1 to n do
begin
read(x);
if odd(x) then inc(s1,x) else inc(s2,x);
end;
writeln('Ji Shu He=',s1);
writeln('Ou Shu He=',s2);
end.