Program zad5a;
  var x,n,i,j:integer;
  a:array[1..20] of integer;
  flag:boolean;
Begin
  read(n);
  for i:=1 to n do
    read(a[i]);
  x:=a[1];
  if n=1 then writeln('jeste rastuci')else
  begin
  for i:=2 to n do
  begin
  flag:=true;
    if a[i]>x then x:=a[i] else
    begin
      flag:=false;
      break;
    end;
  end;
  if flag=true then writeln('jeste rastuci') else writeln('nije');
  end;
End.
  