Натурáльные чи́сла (от лат.naturalis «естественный») — числа, возникающие естественным образом при счёте (1, 2, 3, 4, 5, 6, 7 и так далее…). Последовательность всех натуральных чисел, расположенных в порядке возрастания, называется натуральным рядом.
Ниже рассмотрен пример поиска всех делителей натурального числа на Pascal.
var a,n,c,d:word;
begin
readln( a );
n:=1;
while ( n <= sqrt(a) ) do begin
c:=a mod n;
d:=a div n;
if c = 0 then begin
writeln( n );
if n <> d then writeln( d );
end;
inc( n );
end;
end.