var i:integer;
a:array[1..10] of integer;
begin
for i:=1 to 10 do
begin
if (i mod 2=1) then a[i]:= -1 else a[i]:=1;
write(a[i],'  ');  
end;
end.