var a,b,c:longint;
begin
read(a);
b:=a mod 10;
c:=a div 10;
if b>c then write(b)
       else write(c);
       end.
/**************************************************************
	Problem: 1622
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/