Question

Ав­то­мат по­лу­ча­ет на вход трёхзнач­ное число. По этому числу стро­ит­ся новое число по сле­ду­ю­щим пра­ви­лам. 1. Скла­ды­ва­ют­ся пер­вая и вто­рая, а также вто­рая и тре­тья цифры ис­ход­но­го числа. 2. По­лу­чен­ные два числа за­пи­сы­ва­ют­ся друг за дру­гом в по­ряд­ке убы­ва­ния (без раз­де­ли­те­лей). При­мер. Ис­ход­ное число: 348. Суммы: 3 + 4 = 7; 4 + 8 = 12. Ре­зуль­тат: 127. Ука­жи­те наи­мень­шее число, в ре­зуль­та­те об­ра­бот­ки ко­то­ро­го ав­то­мат вы­даст число 1412.

Answer 1

Var
A,B:integer;
Begin
ReadLn(A);
B:=(A div 100)+((A div 10) mod 10);
A:=((A div 10) mod 10)+(A mod 10);
if A>=B then Write(A,B)
else if B>=A then Write(B,A)
End.

Answer 2

Ответ: наименьшее число, в результате обработки которого автомат выдаст число 1412, это 269. Объяснение: суммы цифр исходного числа 269 равны 2 + 6 = 8 и 6 + 9 = 15. По правилу автомата, полученные два числа записываются друг за другом в порядке убывания, то есть 1512. Затем, поскольку первая цифра результата равна 1, она отбрасывается, и остается число 412. Это наименьшее возможное число, так как если взять любое другое трехзначное число, меньшее 269, то суммы его цифр будут меньше 8 и 15, и в результате получится число, меньшее 1412.