Помоги написать задачу на Паскале. Решить надо с помощью цикла 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. 

 

 

 

 

 

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку