program p1;
var f,g:text;
    s,r,a:array[1..100]of integer;
    n,i,ok,j:integer;
begin
     assign(f,'cutii.in');reset(f);
     assign(g,'cutii.out');rewrite(g);
     readln(f,n);
     for i:=1 to n do
         read(f,a[i]);
     s[1]:=a[1];
     r[1]:=s[1] mod n;
     for i:=2 to n do
         begin
              s[i]:=s[i-1]+a[i];
              r[i]:=s[i] mod n
         end;
         if r[i]=0 then begin
                              ok:=1;
                              for j:=1 to i do write(g,a[j],' ');
                         end;
     close(f);
     close(g);
end.