Написать программу, которая находит все делители введенного числа N. паскаль

Предыдущий
вопрос Следующий
вопрос

Пример кода на Pascal:

program FindDivisors;
var
N, i: Integer;
begin
write('Введите число N: ');
readln(N);
writeln('Делители числа ', N, ':');
for i := 1 to N do
begin
if N mod i = 0 then
writeln(i);
end;
end.

Эта программа запрашивает у пользователя число N, а затем находит и выводит все делители этого числа.