def find_longest_sequence(input)
  longest_sequence = []

  input.each_index do |i|
    sequence = find_sequence(input[i..-1])
    longest_sequence = sequence if sequence.length > longest_sequence.length
  end
  longest_sequence
end

def find_sequence(input)
  return [] if input == []

  sequence = [input.first]
  greater = false
  input.inject do |last, current|
    if greater
      if current > last
        sequence << current
      else
        break
      end
    else
      if current < last
        sequence << current
      else
        break
      end
    end

    greater = !greater
    last = current
  end

  return sequence
end


input = gets.split[1..-1].map { |x| x.to_i }
p input
puts find_longest_sequence(input).length