terse

就批处理而言 冒泡排还是快的
然后在循环里判断连续数否

terse

前面排序都一样 后面判断稍不同

@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
复制代码

[ 本帖最后由 terse 于 2009-10-2 13:23 编辑 ]

terse

不是说排序的吗？
结果出来就是排好序的啊

terse

可能是我理解不够
要是以第一个数为基准 那就直接在数组里找吧 排序也不要
让N + 1 递增 然后 标记
另数组 ”54 11 56 2 55 3 5 4 1 7 56 56 8 10“
最终结果是？

[ 本帖最后由 terse 于 2009-10-2 16:34 编辑 ]

terse

输入 54 11 56 2 55 3 5 4 1 7 56 56 8 10
怎么结果：54  57
并不是你要的  54  56