Question

Ниже записана программа. Получив на вход число x, эта программа печатает два числа, L и M. Укажите наибольшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 8.
var x, L, M: integer;
   begin 
       readln(x); 
       L:=0; M:=0; 
       while x>0 do 
           begin 
             L:=L+1; 
             if (M<x) and (x mod 2=0) then

                 begin 
                    M:=x mod 10; 
                 end; 
                 x:= x div 10; 
           end; 
           writeln(L); write(M); 
    end.

Answer 1

Число должно быть трехзначным и начинаться на 8. Максимальное число при котором L=3, а M=8 будет 899

Ответ 899