Задание 17. Информатика. ЕГЭ. Поляков-6487

В файле содержится последовательность целых чисел, по модулю не превышающих \(20000.\) Определите количество пар элементов последовательности, в которых

• только одно число четырёхзначное;
• сумма квадратов элементов пары делится нацело на минимальное трёхзначное число в последовательности, оканчивающееся на \(3.\)

В ответе запишите сначала количество найденных пар, затем минимальную из сумм квадратов элементов таких пар. Под парой элементов подразумеваются два соседних элемента последовательности.

nums = [int(x) for x in open('6487.txt')]
m3 = min([x for x in nums if  99 < abs(x) < 1000 and abs(x) % 10 == 3])
q, ms = 0, float('inf')

for a, b in zip(nums, nums[1:]):
    if (999 < abs(a) < 10_000) != (999 < abs(b) < 10_000) \
            and (a**2 + b**2) % m3 == 0:
        q += 1
        ms = min(ms, a**2 + b**2)
print(q, ms)