var
   i:integer;
 begin
 i:=-30;
        while (i<=30) do
        begin
                write(i,' ');
                i:=i+2;
        end;
 end.