1 2 55 3 4 5 1 7 8 9 
然后结果是 
删去 55 1
或者直接给出排列好的数列 1 2 3 4 5 7 8 9
复制代码

@echo off&setlocal enabledelayedexpansion
set "str=1 2 55 3 4 5 1 7 8 9"
for %%i in (!str!) do (
    if not defined .%%i (
       set /a n+=1
       set "_!n!=%%i"&set .%%i=a
  ))
         set /a m=n-1
         for /l %%i in (1,1,!m!) do (
         set /a e=%%i+1
         for /l %%j in (!e!,1,!n!) do (
         if !_%%i! gtr !_%%j! set/a _%%j=!_%%i!,_%%i=!_%%j!
        )
     )
    for /l %%i in (1,1,!n!) do (
    if !s1! equ !_%%i! (
    set/a s1-=1
    if defined ..!s1! (set var=!var! !_%%i!)else set var=!var! !s1! !_%%i!
    set ..!_%%i!=.
   )
    set/a s1=_%%i+1
)
echo!var!
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set "str=2 2 12 3 4 5 11 7 8 9"
for %%i in (!str!) do (
    if not defined .%%i (
       set /a n+=1
       set "_!n!=%%i"&set .%%i=a
  ))
         set /a m=n-1
         for /l %%i in (1,1,!m!) do (
         set /a e=%%i+1
         for /l %%j in (!e!,1,!n!) do (
         if !_%%i! gtr !_%%j! set/a _%%j=!_%%i!,_%%i=!_%%j!
        )
     )
    for /l %%i in (1,1,!n!) do (
    if not defined a1 (set/a a1=_%%i,m=1)else (
    set/a "an=a1+m-1"
    if !an! equ !_%%i! (
    if !m! equ 2 (set var=!var! !a1! !an!) else set var=!var! !an!
  ) else set/a a1=_%%i,m=1
)
set /a m+=1
)
echo!var!
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for %%i in (1 1 2 55 3 4 5 1 7 8 9 10) do (
set ...%%i=0000%%i
set /a ...count%%i+=1
set ...!...%%i:~-4!=%%i=!...count%%i!
set ...%%i=
)
for /f "tokens=1,2,* delims==" %%i in ('set ...') do (
for /l %%x in (1,1,%%k) do set /p =%%j <nul)
复制代码

@echo off
setlocal enabledelayedexpansion
set /p a=输入一串数字
set n=1
for %%i in (%a%) do ( 
set _!n!=%%i
set /a n=!n!+1
)
set x=0
set max=%_1%
set /p=%max% <nul
for /l %%i in (2 1 !n!-1) do (
set /a "x=_%%i-max"
if !x! gtr 0 set /p=!_%%i! <nul & set max= &set max=!_%%i!
)
pause
复制代码

@setlocal enabledelayedexpansion&set/pk=&set i=1
@for %%i in (%k%) do @set/ai+=1&set m=0&set r=&(@for /l %%j in (1,1,!i!) do @if !e%%j! lss %%i if !m! lss !l%%j! set m=!l%%j!&set r=!r%%j!)&set r!i!=!r! %%i&set/a l!i!=m+1&set e!i!=%%i
@echo!r%i%!&pause
复制代码

@echo off&setlocal enabledelayedexpansion
set/p k=请输入数字:
set i=1
for %%i in (%k%) do (
set /a i+=1
set m=0
set "r="
for /l %%j in (1,1,!i!) do (
if !e%%j! lss %%i if !m! lss !l%%j! set m=!l%%j!&set "r=!r%%j!"
)
set "r!i!=!r! %%i"
set/a "l!i!=m+1"
set e!i!=%%i
)
@echo !r%i%!
pause
复制代码

MaxLen(1)=1
MaxLen(i)=Max{MaxLen(1),MaxLen(2),...MaxLen(i-1)}+1
MaxLen(1)至MaxLen(i-1)中,若a(j)>a(i),则不计入,即MaxLen(j)暂时为0
复制代码

@echo off&setlocal enabledelayedexpansion&set/pk=&set i=1
(for %%i in (%k%) do set/ai+=1&set m=0&set r=&(for /l %%j in (1,1,!i!) do if !e%%j! lss %%i if !m! lss !l%%j! set m=!l%%j!&set r=!r%%j!)&set r!i!=!r! %%i&set/al!i!=m+1&set e!i!=%%i)&set m=!l1!&set r=!r1!&for /l %%i in (2,1,!i!) do if !m! lss !l%%i! set m=!l%%i!&set r=!r%%i!
echo%r%&pause
复制代码

MaxLen(k)的值,就是在a(k)左边,重点数值小于a(k),且长度最大的那个上升子序列的长度再加1.因为a(k)左边任何终点小于a(k)的子序列,加上a(k)后就能形成一个更长的子序列
复制代码

@echo off&setlocal enabledelayedexpansion
set/pk=
set i=1
for %%i in (%k%) do (
set/a i+=1
set m=0
set r=
for /l %%j in (2,1,!i!-1) do (
if !e%%j! lss %%i if !m! lss !l%%j! set m=!l%%j!&set r=!r%%j!
)
set r!i!=!r! %%i
set/a l!i!=m+1
set e!i!=%%i
)
set m=!l1!
set r=!r1!
for /l %%i in (2,1,!i!) do if !m! lss !l%%i! set m=!l%%i!&set r=!r%%i!
echo%r%
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set/pk=
set i=1
for %%i in (%k%) do (
	set/ai+=1
	set m=0
	set r=
	for /l %%j in (1,1,!i!) do (
		if !e%%j! lss %%i (
			if !m! lss !l%%j! (
				set m=!l%%j!
				set r=!r%%j!
			)
		)
	)
	set r!i!=!r! %%i
	set/al!i!=m+1
	set e!i!=%%i
)
set m=!l1!
set r=!r1!
for /l %%i in (2,1,!i!) do (
	if !m! lss !l%%i! (
		set m=!l%%i!
		set r=!r%%i!
	)
)
echo%r%
pause
复制代码