ivor

@Powershell "& {[ScriptBlock]::Create("'#' + (gc '%~f0' -raw)").Invoke()}" & pause & goto :eof 
gc 1.txt | %{[int[]]$arr=$_ -split ' ';
# 过滤递增1
if(!(($arr[0] + 1 -eq $arr[1]) -and ($arr[1] + 1 -eq $arr[2])-and ($arr[2] + 1 -eq $arr[3])-and ($arr[3] + 1 -eq $arr[4]))) {
    # 过滤递增2
    if(!(($arr[0] + 2 -eq $arr[1]) -and ($arr[1] + 2 -eq $arr[2])-and ($arr[2] + 2 -eq $arr[3])-and ($arr[3] + 2 -eq $arr[4]))) {
        # 过滤整除5
        if(!(($arr[0] % 5  -eq 0) -and ($arr[1] % 5  -eq 0)-and ($arr[2] % 5  -eq 0)-and ($arr[3] % 5  -eq 0)-and ($arr[4] % 5  -eq 0))) {
            # 过滤整除3
            if(!(($arr[0] % 3  -eq 0) -and ($arr[1] % 3  -eq 0)-and ($arr[2] % 3  -eq 0)-and ($arr[3] % 3  -eq 0)-and ($arr[4] % 3  -eq 0))) {
                write $_
            }
        }   
    }
}
}
复制代码

ads350668398

怎么去除奇数 北三被5 我一头雾水 穷尽。。。。

Batcher

06 07 08 09 10 连续 3  失败

修复这个bug你试试：

@echo off
setlocal enabledelayedexpansion
(for /f "tokens=1-5" %%a in ('type "1.txt"') do (
    set flag=0
    set /a sum1=1%%a+1
    set /a sum2=1%%b+1
    set /a sum3=1%%c+1
    set /a sum4=1%%d+1
    if 1%%b equ !sum1! (
        set /a flag+=1
    )
    if 1%%c equ !sum2! (
        set /a flag+=1
    )
    if 1%%d equ !sum3! (
        set /a flag+=1
    )
    if 1%%e equ !sum4! (
        set /a flag+=1
    )
    if !flag! neq 4 (
        echo %%a %%b %%c %%d %%e
    )
))>"2.txt"
复制代码

ads350668398

回复 9# Batcher


01 02 03 04 05 连续1
01 02 03 04 06
01 02 03 04 07
01 02 03 04 08
01 02 03 04 09
01 02 03 04 10
01 02 03 04 11
02 03 04 05 06 连续2
02 04 06 08 10 偶数0
03 06 09 12 15
01 03 05 07 09 奇数1
05 10 15 20 25 整除5
06 09 15 27 33 整除3
01 04 07 10 13
01 05 09 13 17 奇数2
01 06 11 16 21
01 07 13 19 25 奇数3
01 08 15 22 29
01 09 18 26 34
03 11 15 21 23 奇数4
06 10 18 22 28 偶数1
04 06 08 10 12 偶2
06 07 08 09 10 连续3
23 24 25 26 27 连续4
06 10 20 22 28 偶数3
28 29 30 31 32 连续5

我是打算去除这些连续1 2 3 4 5和奇数1 2 3 4 偶数1 2 3
现在连续和偶数基本解决了 虽然很。。。
怎么去除奇数 想不出来了？？？ 还有被3 5 整除？？？？

------------------------
set flag=0
    set /a sum1=%%a+1
    set /a sum2=%%b+1
    set /a sum3=%%c+1
    set /a sum4=%%d+1
    if %%b equ !sum1! (
        set /a flag+=1
    )
    if %%c equ !sum2! (
        set /a flag+=1
    )
    if %%d equ !sum3! (
        set /a flag+=1
    )
    if %%e equ !sum4! (
        set /a flag+=1
    )
    if !flag! neq 4 (
        echo %%a %%b %%c %%d %%e %%f
可能都不知道我说的是什么但是
06 07 08 09 10 连续 3  失败
这一行在运行的时候也处理不掉 我知道是不是我电脑的毛病啊
******************************
(for /f "tokens=1-28" %%a in ('type "1.txt"') do (
    set flag=0
    set /a sum1=%%a+2
    set /a sum2=%%b+2
    set /a sum3=%%c+2
    set /a sum4=%%d+2
    if %%b equ !sum1! (
        set /a flag+=2
    )
    if %%c equ !sum2! (
        set /a flag+=2
    )
    if %%d equ !sum3! (
        set /a flag+=2
    )
    if %%e equ !sum4! (
        set /a flag+=2
    )
    if !flag! neq 4 (
        echo %%a %%b %%c %%d %%e %%f
    )
))>"2.txt"
set s
set sum1
set sum2
set sum3
set sum4
echo !%a%! %%b %%c %%d %%e
start 2.txt
::ping /n 8 127.0.0.1<nul
taskkill /im 2.txt
pause
结果：
02 04 06 08 10 偶数0 成功
06 10 18 22 28 偶数1 失败
04 06 08 10 12 偶2    成功
06 10 20 22 28 偶数3 失败

Batcher

回复 8# ads350668398


    我看不懂这些关系表示什么意思。你自己修改一下4楼的代码，把你想要的计算和判断放进去试试，遇到具体问题再回来问。

ads350668398

回复 4# Batcher


奇数-=~%%a%%2
,#偶数+=%%a%%2,
#被三整除+=%%a%%3,
#和+=100,
可以不可以吧这些关系的数字也删除啊？？
例如

5 9 13 21 33奇数
2 12 26 28 32 偶数
3 9 18 27 33 北三整除

ads350668398

升级版的bat 谢谢关注了

xczxczxcz

回复 5# ads350668398

来个通用点的。powershell

powershell
复制代码

ads350668398

回复 2# ads350668398

【排除12345】谢谢关注
01 02 03 04 06
01 02 03 04 07
01 02 03 04 08
01 02 03 04 09
01 02 03 04 10
01 02 03 04 11

Batcher

是这个意思吗？

@echo off
setlocal enabledelayedexpansion
(for /f "tokens=1-5" %%a in ('type "1.txt"') do (
    set flag=0
    set /a sum1=%%a+1
    set /a sum2=%%b+1
    set /a sum3=%%c+1
    set /a sum4=%%d+1
    if %%b equ !sum1! (
        set /a flag+=1
    )
    if %%c equ !sum2! (
        set /a flag+=1
    )
    if %%d equ !sum3! (
        set /a flag+=1
    )
    if %%e equ !sum4! (
        set /a flag+=1
    )
    if !flag! neq 4 (
        echo %%a %%b %%c %%d %%e
    )
))>"2.txt"
复制代码

Batcher

顶楼的 1.txt 处理之后应该变成什么样子？

ads350668398

每次登陆提出问题 也是厚着脸皮 F5 F5 的刷新等着论坛里的大神帮忙
对于一个10年注册的老鸟了吧的尴尬
对于论坛给过我帮助的网友 无以为报 只有诚挚的祝福