N=gets.to_i
A=gets.split.map(&:to_i)
dpR=[pdpR=[1]*N]
dpL=[pdpL=[1]*N]
(1...N).each{|d|
  dpRd=[]
  dpLd=[]
  (0...N-d).each{|l|
    r=l+d
    dpl=pdpL[l]
    dpr=pdpR[l+1]
    dpLd<<(A[l]>=A[r]?dpl:[dpl,dpr+1].max)
    dpRd<<(A[l]<=A[r]?dpr:[dpr,dpl+1].max)
  }
  dpR<<(pdpR=dpRd)
  dpL<<(pdpL=dpLd)
}
p ((0...N).map{|i|dpL[i][-1]}+(0...N).map{|i|dpR[i][0]}).max