a亚洲精品_精品国产91乱码一区二区三区_亚洲精品在线免费观看视频_欧美日韩亚洲国产综合_久久久久久久久久久成人_在线区

首頁 > 編程 > BAT > 正文

出給新手的數值排序加分題

2020-07-26 20:23:06
字體:
來源:轉載
供稿:網友
出題目的:
掌握任意數列之間的排序技巧
解題要求:
代碼通用、高效
盡量簡潔
盡量不生成臨時文件
加分規則:
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)
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 射久久 | 国产精品美女 | 精品国产欧美一区二区 | 亚洲一二三在线 | 欧美黄色大片网站 | 久久久精品 | 色偷偷噜噜噜亚洲男人 | 中文字幕在线电影观看 | 黄色在线免费观看视频 | 亚洲精品视频一区 | 久久亚洲国产 | а天堂中文最新一区二区三区 | 香蕉久久一区二区不卡无毒影院 | 久久精品视频久久 | 久久久国产一区二区 | 国产又粗又长又硬又猛电影 | 91九色视频| 一本色道久久加勒比88综合 | 亚洲色域网 | 久久精品久久久久电影 | 久久九九这里只有精品 | 婷婷色在线 | 精一区二区| 亚洲欧美日韩另类精品一区二区三区 | 在线观看毛片视频 | 亚洲综合在线一区 | 久久久久久综合 | 日韩久久一区二区 | 国产成人午夜精品影院游乐网 | 夜夜精品视频 | 亚洲一区二区三区中文字幕 | 欧美视频免费看 | www.中文字幕 | 91中文字幕在线 | 国内自拍网站 | 欧美在线a| 最新色站| 亚洲一区中文字幕 | 国产精品久久久久久久久免费桃花 | www.男人天堂 | 成人国产一区二区 |