批处理bat递归计算N！的实现代码

核心代码：

@echo off
:: 代码来自网友：liangbch
setlocal enabledelayedexpansion

echo To calculate n^^!
set/p nn=n=?

set/a "buff_1=1,rad=10000,len=1" 

for /l %%i in (1,1,%nn% ) do (
    set/a cc=0
    for /l %%j in (1,1,!len!) do (
      set/a "tt=buff_%%j* %%i+!cc!"
      set/a "buff_%%j=!tt! %% !rad!,cc=!tt!/!rad!"
    )
    if !cc! gtr 0 (
      set/a len+=1
      set/a buff_!len!=!cc!
    )
)

set/p xx=n^^!=<nul
set/a tt=buff_%len%
set/p xx=!tt!<nul
set/a len-=1

for /l %%i in (%len%,-1,1 ) do (
  set/a tt=buff_%%i
  if !tt! lss 1000 set tt=00000!tt!
  set/p xx=!tt:~-4!<nul
)

echo.
pause

双击输入数字即可。

赞 (0)

相关推荐

  • 批处理bat递归计算N！的实现代码

    核心代码: @echo off :: 代码来自网友:liangbch setlocal enabledelayedexpansion echo To calculate n^^! set/p nn=n=? set/a "buff_1=1,rad=10000,len=1" for /l %%i in (1,1,%nn% ) do ( set/a cc=0 for /l %%j in (1,1,!len!) do ( set/a "tt=buff_%%j* %%i+!cc!&qu

  • 批处理BAT实现正弦曲线和抛物线代码

    先奉上正弦曲线的: @echo off&setlocal enabledelayedexpansion ( :loop for %%i in (30 46 55 59 60 59 55 46 30 14 5 1 0 1 5 14) do ( for /l %%j in (1 1 %%i) do ( set "str=!str! " ) echo !str!#&set str= for /l %%i in (1 1 600) do qdj 2>nul ) goto

  • 通过批处理bat设置系统环境变量的实现代码

    在软件运行过程中,可能需要配置计算机的环境变量,在这里分为两种情况: 一:增加或修改环境变量只在当前软件环境中使用 如我们设置Java的环境变量: set CLASSPATH=%CLASSPATH%;C:\LS\JAVA.JAR 保持原有的不变  自己加上要加的jar包,用分号隔开,当然你也可以写到前面,如:set CLASSPATH=D:/My_Path;%CLASSPATH% set JAVA_HOME=  这里的路径自己写吧 不过这样写只对你打开的这个dos窗口有效,也就是你只有在这个窗口

  • 批处理之家发现的用批处理实现的系统类应用代码

    批处理之家发现的用批处理实现的系统类应用代码 比如菜单的排序,就用到不一样的方法 还有输出的方式等...... 大家用了就知道 写的不好.还请大家多多指教. 由于代码过长,请下载附件. 回帖是美德,下了就要顶啊 bat......右键bat LJ....清理LJ文件  ZCB...查看启动项     JC......查看进程 MIM...通密码管理  IP....查看IP配置    sys.....系统信息 dir.....诊断工具  JH....组策略结集    zcb.......注册表 Z

  • 批处理BAT替换与截取字符串的用法t1=%a:~3%是什么意思

    一.替换用法 例 复制代码 代码如下: @echo off set a=belcome to CMD borld! set temp=%a:b=w% echo %temp% pause 将显示 welcome to CMD world! 即用w替换了变量a中的b. 二.截取用法 字符串最前面的光标所在处表示第0位,第一个字符后面的光标所在表示第一位,依次类推. 为了更好的理解截取用法,下面给出了字符串superhero位数的相关示意图: s u p e r h e r o 0 1 2 3 --

  • 批处理程序中的“多线程”处理代码

    如下内容将简单举例,在WINDOWS下使用批处理做多进程并发,以达到"多线程"的效果. 例:需要PING 192.168.0.1到192.168.0.254的所有IP地址,并将是否能PING通的结果输出到log.txt 实现如下: rem 主程序.bat,只需一行代码,调用checkip.bat,经测试,CPU2.6G MEM1G可并发40个左右的进程 复制代码 代码如下: for /l %%i in (1,1,254) do (start /min cmd /c checkip.ba

  • 自动以管理员身份运行批处理bat文件(vbs与bat两种方法)

    但是,批处理脚本不会默认已管理员身份运行,一般情况下,我会将脚本命名为"XXXXXX(请右键点击,用管理员身份运行!).bat",但总有些用户会忽略这条提示,直接运行,此时由于权限不足,导致脚本运行失败. 我们可以使用一种变通的方法,让bat启动时,首先调用vbs脚本,通过vbs脚本,以管理员身份调用该bat的 runas 部分 我们的脚本可以写在runas 下,这样就点击该bat脚本,就可以已管理员身份运行了 示例代码如下 @ECHO OFF setlocal EnableDelay

  • windows 批处理bat连接本地mysql 创建制定数据 并执行sql文件

    实例代码 @echo off set path=C:\Program Files\MySQL\MySQL Server 5.7\bin cd ./ set CURR_PATH=%cd% mysql -h localhost -u root --password=123456 < operate.txt mysql -h localhost -u root -p stcounter < stcounter.sql --password=123456 @echo off:关闭回显  不出现在doc

  • 批处理bat将txt文本第一列内容相同的行的最后一列的数字相加

    小弟不材,想了好几天没写出来,才来论坛求助,希望各位高手帮帮忙解下题 ,在此先谢谢各位了- 比如,aaa.txt 内容如下 11111,20150430,10 11111,20150430,20 11111,20150430,30 22222,20150430,40 33333,20150430,50 44444,20150430,60 44444,20150430,70 55555,20150430,80 66666,20150430,90 66666,20150430,100 77777,2

  • 批处理bat函数：大数字加减乘除、时期时间计算、数字排序、进制转换等

    目录 计算任意位数的正整数加法 计算1000位以内的正整数减法 计算任意位数的正整数乘法 500位内整数除法函数 计算时间差 可以处理0开头的数.重复数及200位以内的超大整数(封装) 计算指定天数 前/后 的日期及星期 进制转换(函数) 1.任意进制互转 二进制转十六进制(封装)(通过4位一段转换,可处理超大数) 十六进制转二进制(封装)(通过4位一段转换,可处理超大数) 二进制转十进制(封装)(只能处理cmd范围内的数,小巧方便代码中调用) 获取10进制数(含负数)的 原码.反码.补码(未封

随机推荐