Board logo

标题: [原创]**********直接选择排序************ [打印本页]

作者: s11ss     时间: 2007-9-16 13:58    标题: [原创]**********直接选择排序************
@echo off setlocal enabledelayedexpansion :::::::::::::::::::::::::::::::::::::::::Straight Selection Sort::::::::::::::::::::::::::::::::::::::::: ::::::::Get Original Numbers:::::::: echo Please input some numbers separated from "," , like 2007,9,14,88: set /a s=0 set /p str= set /a len=0 set /a nx=0 :c call set word=%%str:~%len%,1%% set /a len+=1 if "%word%" equ "," (set /a nx+=1 & call :e) if not "%word%" equ "" (goto :c) set /a nx+=1 call :e goto :o :e set /a sn=%len%-%s%-1 call set n%nx%=%%str:~%s%,%sn%%% set /a s=%len% goto :eof ::::::::Get Original Numbers:::::::: ::::::::Deal With Numbers:::::::: :o set /a i=1 :ooo set /a k=%i% set /a j=%i%+1 :oo if !n%j%! lss !n%k%! set /a k=%j% set /a j+=1 if %j% leq %nx% goto :oo if %k% neq %i% ( set /a temporary=!n%i%! set /a n%i%=!n%k%! set /a n%k%=!temporary! ) set /a i+=1 if %i% lss %nx% goto :ooo ::::::::Deal With Numbers:::::::: ::::::::Print The Result:::::::: :p for /l %%c in (1,1,%nx%) do (set str2=!str2!!n%%c! ) echo. echo The numbers after sorting are: echo !str2! echo. echo Press Any Key To Exit... pause>nul goto :eof ::::::::Print The Result:::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::s11ss ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::2007-9-16