работа с циклами, не могу понять

[theGamer]

Как в delphi через шаг, while u repeat
Вывести по возрастанию нечетные числа, принадлежащие интервалу от [a;b]. Границы интервала задаются с клаиватуры.
Безумно сложная задача для меня, т.к с циклами я не работал

[Poma][a]

program Task1;

var
            a, b, i : Integer;

begin
            ReadLn (a,b);
            if Odd (a) then
                        i := a
            else
                        i := a+1;
            while i <= b do  begin
                        WriteLn (i);
                        Inc (i,2);
            end;
end.