Нужно пояснение задачи Паскаль

[Hitchi]

Найти натуральное число в интервале от а до б с максимальной суммой делителей.

Program sumdel;
var a, b, c, d, i, dmax, summax: integer;
Begin
   write('Введите первое число: ');
   readln(a);
   write('Введите второе число: ');
   readln(b);
   dmax:=1;
   summax:=1;
   for i:=a to b do
    begin
       c:=0;
       for d:=1 to i do
        begin
           if (i mod d = 0) then c:=c+d;
        end;
        if summax<c then
         begin
            summax:=c;
            dmax:=i;
         end;
    end;
    writeln('Число с максимальной суммой делителей= ', dmax);
    writeln('Сумма делителей= ', summax);
end.

Для чего вначале dmax и summax приравнивается к единице, и что тут значит

if summax<c then
         begin
            summax:=c;
            dmax:=i;
         end;

[Arigato]

Потому как 1 есть минимальное значение среди всех натуральных чисел. А поскольку надо найти максимум, то инициализируем переменные минимально возможным значением.