Трехзначное число в 5 раз больше произведения своих цифр. Какое это число?

vara,b,c,i: integer;begin  for i:=100 to 999 do begin     a:=i div 100;     b:=(i-a*100) div 10;     c:=i-a*100-b*10;     if a*b*c=i then     begin        writeln(i);        break;     end;   end;end;Это число 1751*7*5=35*5

// PascalABC.NET 3.3, сборка 1573 от 04.11.2017// Внимание! Если программа не работает, обновите версию!begin  for var a:=1 to 9 do    for var b:=1 to 9 do      for var c:=1 to 9 do        if 100*a+10*b+c=5*a*b*c then Write(a,b,c,' ');end.Результат175