批处理之家 - Powered by Discuz! Board

标题: [数值计算] 请教批处理数学类排列组合问题：有多少种存在 [打印本页]

作者: 曾经的你 时间: 2018-10-12 15:34 标题: 请教批处理数学类排列组合问题：有多少种存在

在26个英文字母中排除（a/e/i/o/u/v），剩余的20个字母，每4个组合在一起（可以存在bbbb/dddd/rrtt等情况，但是要排除在生成中出现的重复4个相同数组），有多少个可能，求助大佬给个bat生成下txt即可。

再就是求不祛除这6个字母，一共有多少种可能，并生成txt

作者: hnfeng 时间: 2018-10-12 15:57

本帖最后由 hnfeng 于 2018-10-12 16:09 编辑

@echo off
for %%a in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
  for %%b in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
    for %%c in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
      for %%d in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
        echo %%a%%b%%c%%d
        echo %%a%%b%%c%%d>>abcd.txt
))))
        
pause
exit
复制代码

@echo off&setlocal EnableDelayedExpansion
set /a n=0
for %%a in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
  for %%b in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
    for %%c in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
      for %%d in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
        set /a n+=1
        echo %%a%%b%%c%%d
        echo %%a%%b%%c%%d>>abcd.txt
))))
echo 一共有 %n% 种
echo 一共有 %n% 种>>abcd.txt

pause
exit
复制代码

作者: 曾经的你 时间: 2018-10-12 17:26

回复 2# hnfeng

老哥，666

作者: Batcher 时间: 2018-10-12 21:02

回复 2# hnfeng

@echo off
(for %%a in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
    for %%b in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
        for %%c in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
            for %%d in (b,c,d,f,g,h,j,k,l,m,n,p,q,r,s,t,w,x,y,z) do (
                echo %%a%%b%%c%%d
            )
        )
    )
))>abcd.txt
复制代码

把重定向放到最外面，可以极大的提升代码执行效率。

作者: 曾经的你 时间: 2021-6-22 10:35

回复 4# Batcher

跪谢

欢迎光临批处理之家 (http://www.bathome.net/)