В числе 57x692y1940
Приведём решение на языке Python.
c = []
for x in range(40):
for y in range(40):
t = 5*40**8+7*40**7+x*40**6+6*40**5+9*40**4+2*40**3+y*40**2+1*40*1+9
if t % 39 == 0 and (y*40**1+x)**0.5==round((y*40**1+x)**0.5):
c.append(y*40**1+x)
print(max(c))
Ответ: 1521.
Приведём решение Юрия Красильникова на языке Python.
def num(digits,base):
n = 0
for d in digits:
n = n*base + d
return n
def square(n):
return int(n**0.5 + 0.5)**2 == n
a = [num([y,x],40) for x in range(40) for y in range(1,40) if num([5,7,x,6,9,2,y,1,9],40)%39==0 and square(num([y,x],40))]
print(max(a))
Примечание: В решении используется функция num(digits,base). digits — список целых чисел, содержащий числовые значений цифр числа в системе счисления по основанию base. Функция возвращает значение числа, записанного этими цифрами. Данная функция подходит для решений задач с любым основанием системы счисления, сколь угодно большим.

