Язык - PascalVar 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,' ');Если не работает то напишите.