К=5*3*4 в пятизначном числе пропущены 2 цифры, восстановите их если известно что число делится на 37

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  for var i:=0 to 9 do
  for var j:=0 to 9 do
    if (50000+1000*i+300+10*j+4) mod 37 =0
      then Print('5'+i+'3'+j+'4')
end.

Результат
50394 53354 56314