Язык - Pascal
Var
n,m,i:longint;
begin
readln(n,M);
for i:=n to m do if not odd(i) then Write(i,' ');
end.
Если не включая n и m то строку for i:=n to m do if not odd(i) then Write(i,' '); меняем на for i:=n+1 to m-1 do if not odd(i) then Write(i,' ');
Если не работает то напишите.