program Zada4a_5; {$APPTYPE CONSOLE} var m,i:integer; begin write('enter m='); readln(m); for i:=m to 10 do if abs(i) mod 2=1 then writeln(abs(i)); readln; end.