Ошибка в задаче на turbo pascal

[SkuLLL]

Помогите исправить ошибку плизз
Найти количество нечетных делителей натурального числа, больших К(К вводится с клавиатуры)

Error 93: invalid FOR control variable.
Program EX2_1;
var i,k,n,k1:real;
begin
writeln('input k');
readln(k);
writeln('input number');
readln(n);
For i:=k to n do
if (i mod 2<>0 and (n mod i))=0 then k1:= k1+1;
end;
writeln(k1)
readln;
end.

[Прик]

Это же просто.
Управляющая переменная цикла не может быть типа Real. Только целочисленным типом (integer, например).