Помоги написать задачу на Паскале. Решить надо с помощью цикла FOR. Вывести на экран все делители данного числа введенного с клавиатуры.
var
n,i:longint;
begin
write (N = );readln(n);
for i:=2 to n div 2 do
if n mod i = 0 then writeln (i);
readln;
end.
Оцени ответ
