Помогите, пожалуйста. найдите все значения цифр x и у, если число 4x87y6 делиться на 56.

все пары (x y): (2 3), (6 7), (9 3). как решить задачу математически, не знаю, я на паскале написал программу, которая перебирает все варианты

var x,y:integer;
i:longint;
begin
for x:=0 to 9 do
for y:=0 to 9 do begin
i:=408706+x*10000+y*10;
if (i mod 56)=0 then writeln(x,' ',y);
end;
end.