出给新手的数值排序加分题

所属分类: 脚本专栏 / DOS/BAT 阅读数: 236
收藏 0 赞 0 分享
出题目的:
掌握任意数列之间的排序技巧
解题要求:
代码通用、高效
尽量简洁
尽量不生成临时文件
加分规则:
1 思路独特基准分5分
2 代码高效、通用基准分4分
3 技巧高超基准分3分
4 代码简洁基准分2分
5 完美代码加分15分
题目如下:
给出任意一组数列,正序输出,如:
3 2008 11 19 777 23 2014 453 789 51
输出为:3 11 19 23 51 453 777 789 2008 2014
说明:
不必考虑特大数,所给的数列中都是整数值。
dishuo:
复制代码 代码如下:

cls&@echo off&setlocal enabledelayedexpansion
set "strings=3 2008 11 19 777 23 2014 453 789 51"
echo %strings%
set/a n=0
for %%i in (%strings%) do (
set/a n+=1
set num[!n!]=%%i
)
call :quicksort num 1 %n%
for /l %%i in (1,1,%n%) do echo !num[%%i]!
pause&goto:eof
:QuickSort
::code by dishuostec
::use call :quicksort arrary low high
set "ARR=%1"
set/a dep=0
call :QS %2 %3
goto:eof
:QS
set/a dep+=1,lTmpLow=%1,lTmpHi=%2,Low=%1,Hi=%2
if %Hi% leq %Low% set/a dep-=1&goto :eof
set/a lTmpMid=(Low+Hi)/2
call set/a vTempVal=%%%ARR%[!lTmpMid!]%%
:qsMainLoop
if !lTmpLow! leq !lTmpHi! (
:qsLoop1
call set/a vVal=%%%ARR%[!lTmpLow!]%%
if !vVal! lss !vTempVal! if !lTmpLow! lss !Hi! set/a lTmpLow+=1& goto qsLoop1
:qsLoop2
call set/a vVal=%%%ARR%[!lTmpHi!]%%
if !vTempVal! lss !vVal! if !Low! lss !lTmpHi! set/a lTmpHi-=1&goto qsLoop2
:qsSwap
if !lTmpLow! leq !lTmpHi! (
call set/a vTmpHold=%%%ARR%[!lTmpLow!]%%
call set/a %ARR%[!lTmpLow!]=%%%ARR%[!lTmpHi!]%%
set/a %ARR%[!lTmpHi!]=vTmpHold
set/a lTmpLow+=1,lTmpHi-=1
)
goto qsMainLoop
)
set/a lTmpLow[%dep%]=lTmpLow,Hi[%dep%]=Hi
if %Low% lss %lTmpHi% call :QS %Low% %lTmpHi%
call set lTmpLow=%%lTmpLow[!dep!]%%&call set Hi=%%Hi[!dep!]%%
if %lTmpLow% lss %Hi% call :QS %lTmpLow% %Hi%
set/a dep-=1&goto :eof

 
 
terse:
复制代码 代码如下:

@echo off&setlocal enabledelayedexpansion
set str=3 2008 11 19 777 23 2014 453 789 51
for %%i in (%str%) do (
set str=0000000000%%i
set .!str:~-10! !random!=%%i
)
for /f "tokens=2 delims==" %%i in ('set .') do set/p=%%i <nul
pause>nul

 
 
MKL:
复制代码 代码如下:

@echo off&setlocal enabledelayedexpansion
set "p=3 2008 11 19 777 23 2014 453 789 51"
for %%i in (%p%) do (
set t=1
for %%r in (%p%) do (
if %%i gtr %%r set /a t=!t!+1
)
set !t!=%%i
)
echo !1! !2! !3! !4! !5! !6! !7! !8! !9! !10!
pause

 
523066680:
复制代码 代码如下:

@echo off
setlocal enabledelayedexpansion
set hang=3 2008 11 19 777 23 2014 453 789 51 3 3 4 2014
set n=0
for %%a in (%hang%) do (
set /a num=1,n+=1
for %%b in (%hang%) do (
if %%a gtr %%b set /a num+=1
)
call :next !num!
set !num!=%%a
)
for /l %%a in (1,1,%n%) do echo !%%a!
pause
goto :eof
:next
if defined %num% (set /a num+=1 &goto :next)
更多精彩内容其他人还在看

服务器应用自动重新启动IIS批处理 原创

本站原创的用bat实现重新启动服务器的IIS服务器
收藏 0 赞 0 分享

命令行实现MAC与IP地址绑定 ip mac绑定 如何绑定mac地址

一般手上没有软件,就可以使用这命令行实现MAC与IP地址绑定
收藏 0 赞 0 分享

diskcopy 命令使用说明

diskcopy 命令使用说明
收藏 0 赞 0 分享

arp病毒 防止arp病毒的批处理

建个文本文档 复制以上代码保存为bat文件.加载到启动项去,这样应该能防护到.每次开机时都绑定绑定网关Mac和IP 确实能防止中arp
收藏 0 赞 0 分享

del rd命令行下删除文件不需要确认

del rd命令行下删除文件不需要确认
收藏 0 赞 0 分享

dos下用recover修复损坏的TXT文件

修复损坏的TXT文件的简单方法
收藏 0 赞 0 分享

批处理设置windows服务器的代码ThecSafe1.9.4第1/3页

一个既是服务器安全设置工具,也是一个学习批处理非常好的教程。虽然入手看是难了点,只有带着问题去学习才能真正的去了解。
收藏 0 赞 0 分享

服务器常用批处理代码 原创

经常维护服务器,由于mssql数据库经常会占用大量内存,所以我查找资料写了如下代码,方便自己也利于别人使用,都是直接从服务器上直接拿来的
收藏 0 赞 0 分享

利用mshta调用运行js或vbs的

mshta同时调用js和vbs
收藏 0 赞 0 分享

DOS命令 Interlnk、Intersvr命令使用说明

interlnk    启动简易网客户机 [适用场合]  如果有两台电脑可以通过它和intersvr联成简易的网络,这是条很有          用的命令,但不常用
收藏 0 赞 0 分享
查看更多