В выражении 123x37 + 4x5937 x обозначает некоторую цифру из алфавита системы счисления
Приведём решение на языке Python.
for x in range(37):
t = 1*37**3 + 2*37**2 + 3*37**1 + x*37**0 + 4*37**3 + x*37**2 + 5*37**1 + 9*37**0
if t % 36 == 0:
print(t // 36)
break
Ответ: 7348.
Приведём решение Сергея Донец на PascalABC.NET:
var d := (('0'..'9') + ('A'..'Z')).ToArray;
function Horner(s: string; baseN: integer): Integer;
begin Result := 0;
foreach var ch in s do
Result := Result * baseN + d.IndexOf(ch);
end;
begin
foreach var x in d do begin
var a := Horner($'123{x}', 37);
var b := Horner($'4{x}59', 37);
var s := a + b;
if s mod 36 = 0 then begin
Println(s div 36);
exit;
end;
end;
end.