var i:integer;
    a:array[1..10] of integer;  // 输入的10个数
    b:array[1..2] of integer;   //b[1]---递增序列的个数，b[2]--为递减
    big:boolean;
    
begin
   read(a[1],a[2]);
   if a[1]>a[2] then
   begin
      big:=false;
      inc(b[2]);
   end
   else
   begin
      big:=true;
      inc(b[1]);
   end;
      
   for i:=3 to 10 do
   begin
      read(a[i]);
      if ((a[i]>a[i-1]) and (big=false)) then
         inc(b[1]);
      if ((a[i]<a[i-1]) and (big=true)) then
         inc(b[2]);
   end;
   writeln(b[1]+b[2]);    //输出总个数
   readln;
end.