Билет называют счастливым если в его номере сумма первых трех цифр равна сумме последних трех. Посчитать число тех счасливых билетов, у которой сумма цифр равна 13. Номера билета от 000000 до 999999. Паскаль. Нужен Mod и Div

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

program HappyTicketsCount;

var
ticket, sum, count: integer;

begin
count := 0;

for ticket := 0 to 999999 do
begin
sum := (ticket div 100000) mod 10 + (ticket div 10000) mod 10 + (ticket div 1000) mod 10 -
(ticket div 100) mod 10 - (ticket div 10) mod 10 - ticket mod 10;

end;

writeln('Number of happy tickets with sum of digits equal to 13: ', count);
end.