import sequtils, strutils

let
  n = parseInt readLine stdin
  a = stdin.readLine.split.map parseInt
var
  cnt = 0

for i in 2..<n:
  let
    max = max a[i.pred(2)..i]
    min = min a[i.pred(2)..i]
    mm = {max, min}
    
  if a[i] notin mm:
    inc cnt
  if a[i.pred 2] notin mm:
    inc cnt

echo cnt