Для каждого натурального числа в промежутке [m;n] вывести все делители, кроме единицы и самого числа. m и n вводятся с клавиатуры. Выводить в формате число: делители.

//Pascal ABC.NET 3.1 сборка 1256Var m,n,i,j:integer;beginreadln(m,n);for i:=m to n do begin  write(i,':');   for j:=2 to i div 2 do    if i mod j=0 then write(j:4);  writeln; end;end.Пример ввода:1216Пример вывода:12:   2   3   4   613:14:   2   715:   3   516:   2   4   8