Program e4;
Var MAX, N, X:integer;
Begin
		MAX := -999;
		For N:= 1 to 10 do
		Begin
			Readln(X);
			If X > MAX then
				MAX := X
		End;
Writeln(MAX)
		End.