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

var K,n,i: integer;beginwriteln('Введите число');readln(K); n:=0;for i:=1 to K doif (i mod 2=1)and(K mod i =0) then n:=n+1;writeln('Количество нечетных делителей числа равно ', n);readlnend.Выбирайте лучший ;)