var i:longint; n,max:real;
begin
  while not eof do
     begin
       max:=-1000000000000000000;
       for i:=1 to 10 do
         begin
           read(n);
           if n>max then max:=n;
         end;
       readln;
       writeln('max=',max:0:0);
     end;
end.

/**************************************************************
	Problem: 2181
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/