Question

пж, очень нужно 85 балов даю

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger;

 Write(Max(n div 10, n mod 10))

end.