Автомат получает на вход четырёхзначное число (число не может начинаться с нуля). По этому числу строится новое число по следующим правилам.
1. Складываются отдельно первая и вторая, вторая и третья, третья и четвёртая цифры заданного числа.
2. Наименьшая из полученных трёх сумм удаляется.
3. Оставшиеся две суммы записываются друг за другом в порядке неубывания без разделителей.
Пример. Исходное число: 1982. Суммы: 1 + 9 = 10, 9 + 8 = 17, 8 + 2 = 10.
Укажите наименьшее число, при обработке которого автомат выдаёт
Заметим, что 1215 — это
Ответ: 1396.
Приведём другое решение на языке Python.
for i in range(1000, 10000):
s = str(i)
k1 = int(s[0]) + int(s[1])
k2 = int(s[1]) + int(s[2])
k3 = int(s[2]) + int(s[3])
first = str(k1 + k2 + k3 - max(k1, k2, k3) - min(k1, k2, k3))
second = str(max(k1, k2, k3))
s1 = first + second
if s1 == '1215':
print(i)
break
Приведём решение Сергея Донец на PascalABC.NET:
uses School;
begin
var tt := 1215;
for var i := 1000 to 9999 do begin
var (a,b,c,d) := i.Digits;
var (s1, s2, s3) := [a+b, b+c, c+d].sorted;
var res := s2 < s3 ? s2.ToString+s3 : s3.ToString+s2;
if res.ToInteger = tt then begin
Print(i);
break;
end;
end;
end.