求最大连续子序列的和 输入： 　　　　n(n≤500)； 　　　　n个整数； 　输出：该序列中最大的连续子序列的和max。 {$A+,B-,C+,D+,E-,F-,G+,H+,I+,J+,K-,L+,M-,N+,O+,P+,Q-,R+,S-,T-,U-,V+,W-,X+,Y+,Z1} {$MINSTACKSIZE $00004000} {$MAXSTACKSIZE $00100000} {$IMAGEBASE $00400000} {$APPTYPE GUI} program ex11_1; {$APPTYPE CONSOLE} uses SysUtils; const infile=