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

Помогите решить, очень надо Найти количество делителей натурального числа, больших К (К вводить с клавиатуры). (только через операторы if и for)
Гость
Ответ(ы) на вопрос:
Гость
Program del; uses crt; var N,K,i,m:integer; begin write( 'введите число N=' ); readln(N); write( 'введите ограничитель делителей (K