program max1;

{$APPTYPE CONSOLE}

var t:array[1..5] of integer;
s:real;
max,n,i:integer;
begin
readln(n);
for i:=1 to n do readln(t[i]);
max:=t[1];
for i :=2 to n do
if t[i]>max then max:=t[i];
writeln(max);
readln;
readln;
end.