[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
jinzeyu

Rank: 4

帖子
161 
积分
470 
技术
3  
捐助
0  
注册时间
2010-8-11 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2012-3-11 15:16 | 只看该作者

批处理脚本实现C语言趣味编程百例008：借书方案知多少

要求使用批处理实现，加分：1个技术分
小明有五本新书，要借给A，B，C三位小朋友，若每人每次只能借一本，则可以有多少种不同的借法？
*问题分析与算法设计
本问题实际上是一个排列问题，即求从5个中取3个进行排列的方法的总数。首先对五本书从1至5进行编号，然后使用穷举的方法。假设三个人分别借这五本书中的一本，当三个人所借的书的编号都不相同时，就是满足题意的一种借阅方法。
*程序说明与注释
  1. int main()

  2. {

  3. int a,b,c,count=0;

  4. printf("There are diffrent methods for XM to distribute books to 3 readers:\n");

  5. for(a=1;a<=5;a++) /*穷举第一个人借5本书中的1本的全部情况*/

  6. for(b=1;b<=5;b++) /*穷举第二个人借5本书中的一本的全部情况*/

  7. for(c=1;a!=b&&c<=5;c++) /*当前两个人借不同的书时，穷举第三个人借5本书

  8. 中的1本的全部情况*/

  9. if(c!=a&&c!=b) /*判断第三人与前两个人借的书是否不同*/

  10. printf(count%8?"%2d:%d,%d,%d ":"%2d:%d,%d,%d\n ",++count,a,b,c);

  11. /*打印可能的借阅方法*/

  12. }
复制代码
*运行结果
There are diffrent methods for XM to distribute books to 3 readers:
1: 1,2,3 2: 1,2,4 3: 1,2,5 4: 1,3,2 5: 1,3,4
6: 1,3,5 7: 1,4,2 8: 1,4,3 9: 1,4,5 10:1,5,2
11:1,5,3 12:1,5,4 13:2,1,3 14:2,1,4 15:2,1,5
16:2,3,1 17:2,3,4 18:2,3,5 19:2,4,1 20:2,4,3
21:2,4,5 22:2,5,1 23:2,5,3 24:2,5,4 25:3,1,2
26:3,1,4 27:3,1,5 28:3,2,1 29:3,2,4 30:3,2,5
31:3,4,1 32:3,4,2 33:3,4,5 34:3,5,1 35:3,5,2
36:3,5,4 37:4,1,2 38:4,1,3 39:4,1,5 40:4,2,1
41:4,2,3 42:4,2,5 43:4,3,1 44:4,3,2 45:4,3,5
46:4,5,1 47:4,5,2 48:4,5,3 49:5,1,2 50:5,1,3
51:5,1,4 52:5,2,1 53:5,2,3 54:5,2,4 55:5,3,1
56:5,3,2 57:5,3,4 58:5,4,1 59:5,4,2 60:5,4,3
收藏 分享

terse

Rank: 8Rank: 8

帖子
2338 
积分
9729 
技术
472  
捐助
0  
注册时间
2008-2-25 
2楼
发表于 2012-3-11 20:46 | 只看该作者
本帖最后由 terse 于 2012-3-11 20:49 编辑

不想在FOR里 CALL 出来 所以有一段重复代码在里面 虽显臃肿 但CALL的效率。。
  1. @echo off&setlocal enabledelayedexpansion

  2. set /a N=5,R=3,S=N-R,i=1,p=1,_i=R-1

  3. for /l %%i in (1,1,%S%) do set /a "i*=(N-%%i+1),P*=%%i"

  4. set /a i/=p,P=1

  5. for /l %%i in (1 1 !R!) do set /a "P*=%%i,J%%i=P"&set T=10%%i&set "str=!str!#!T:~-2!

  6. set /aP-=1

  7. for /l %%i in (1 1 %R%) do set /a A%%i=%%i,B%%i=%%i+S&set T=10%%i&set "_!T:~-2!=%%i"

  8. for /l %%i in (0 1 %p%) do (

  9.     set T=!str!&set M=%%i&set #=&set "$="

  10.     for /l %%j in (%_i% -1 1) do (

  11.         set /a "D=M/J%%j*3,M=%%i%%J%%j"

  12.         for %%k in (!D!) do (

  13.             for %%l in ("!T:~%%k,3!") do (

  14.                 set #=!#! %%~l

  15.                 set T=!T:%%~l=!

  16.             )

  17.         )

  18.     )

  19.     for %%j in ("!#:#=!" "!T:#=!") do for %%k in (%%~j) do set $=!$! !_%%k!

  20.     echo!$!

  21. )

  22. for /l %%a in (2 1 !i!) do (

  23.     for /l %%i in (1 1 !R!) do if "#!A%%i!" neq "#!B%%i!" set M=%%i

  24.     for %%i in (!M!) do set L=!A%%i!

  25.     for /l %%j in (1 1 %R%) do (

  26.         if %%j geq !M! set/a A%%j=L+1,L=A%%j

  27.         set T=10%%j

  28.         set "_!T:~-2!=!A%%j!"

  29.     )

  30.     for /l %%i in (0 1 %p%) do (

  31.        set T=!str!&set M=%%i&set #=&set "$="

  32.        for /l %%j in (%_i% -1 1) do (

  33.            set /a "i=M/J%%j*3,M=%%i%%J%%j"

  34.            for %%k in (!i!) do (

  35.                for %%l in ("!T:~%%k,3!") do (

  36.                    set #=!#! %%~l

  37.                    set T=!T:%%~l=!

  38.                )

  39.            )

  40.        )

  41.        for %%j in ("!#:#=!" "!T:#=!") do for %%k in (%%~j) do set $=!$! !_%%k!

  42.        ECHO!$!

  43.    )

  44. )

  45. 

  46. pause
复制代码
1

评分人数

TOP

返回列表