Вопрос пользователя:
Ниже записана программа. Получив на вход число 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.
Илюха отвечает:
Число должно быть трехзначным и начинаться на 8. Максимальное число при котором L=3, а M=8 будет 899
Ответ 899