Program Pr1;
uses crt;
var max,a:integer;
Begin
clrscr;
max:=0;a:=1;
while alt;gt;0 do begin
readln(a);
if agt;max then max:=a;
end;
writeln(max);
end.