2016-08-02 16 views
5

Yeni bir şey olarak, bir toplu iş komut dosyasıyla (https://projecteuler.net/problem=5) Project Euler Problem 5'i tamamlamaya çalışıyorum. Ancak; Birkaç problemle karşılaştım. Kimse benim kodumdan geçerse, bu harika olur. o init mod iter bir 0 döner ve bu olursa o Ancak 21. ulaşıncaya kadar, iter değeri 1 eklemek olmadığını kontrol yapmak anlamına NelerBir Toplu Komut Dosyası İçinde Modül Aritmetiğini Gerçekleştirme

@ECHO off 

SET init=1 
SET iter=1 
SET /a func=%init% %% %iter% 
cls 

:Num 
IF func==0 (
    IF iter==20 (
     ECHO Val = %init% 
     pause 
     exit 
    ) ELSE (
     SET /a iter+=1 
     GOTO Num 
    ) 
) ELSE (
    SET iter=1 
    SET /a init+=1 
    GOTO Num 
) 

; 0'a eşit değilse, yineleme sayısı tekrar 0'a ayarlanır ve tekrar hesaplamaya başlar.


gerçekleşmesi DEMEK ne bir örnek:

1 mod 1 = 0, Therefor add 1 to iter 
1 mod 2 != 0, Therefor init is set to 0 and 1 is added to init 
2 mod 1 = 0, Therefor add 1 to iter 
2 mod 2 = 0, Therefor add 1 to iter 
2 mod 3 != 0, Therefor init is set to 0 and 1 is added to init 

Ve benzeri ve benzeri.


OLUR ne bir örnek:

1 mod 1 != 0, Therefor add 1 to init 
2 mod 1 != 0, Therefor add 1 to init 
3 mod 1 != 0, Therefor add 1 to init 

Ve benzeri ve benzeri.



Herhangi bir yardım için teşekkür ederiz, teşekkürler.

+0

Kodda birkaç değişiklik yaptım; Şimdi modül aritmetiğini tamamen atlıyor ve 1 mod 1 - 20 = 0 olduğunu söylüyor. Neden bunun üzerine düşünceler? Num "% fonk%" EĞER == "0: ' Bir işlev = "% init% %%% iter%" cls = 1 SET iter = 1 SET/init SET kapalı @ECHO "( \t IF "% iter%" == "21"( \t \t yankı. \t \t eCHO Val =% init% \t \t yankı. \t \t basın çıkmak için herhangi bir tuşa yankı... \t \t p ause> nul \t \t çıkış \t) başka ( \t \t eko% init% mod% iter% = 0; CONT \t \t SET/a iter + = 1 \t \t GOTO Num \t) ) başka ( eko% init% mod% iter%!= 0; ARA \t SET iter = 1 \t SET/çirkin biçimlendirme için bir başlatma + = 1 \t GOTO Num ) ' yazık ki. – Sennsei

+3

Hiçbir zaman '% func% 'değerini yeniden hesaplamazsınız. – SomethingDark

+0

Bunu nasıl ekleyebilirim? – Sennsei

cevap

0

bu konuda nasıl (!?) (? !!)

@Echo off 
setlocal enabledelayedexpansion 
SET init=1 
SET iter=1 
cls 
set loopCounter=1 
set loopBatch=1 

:numLoop 
SET /a func="!init! %% !iter!" 
IF !iter! == 21 (goto :done) 
IF !func! == 0 (call :incIter) ELSE (call :incInit) 
SET /a loopCounter+=1 
SET /a loopBatch="%loopCounter% %% 1000" 
if !loopBatch! == 0 (echo %loopCounter% iterations done) 
goto :numLoop 

:incInit 
    rem echo %init% mod %iter% == %func%; Increasing init 
    SET iter=1 
    SET /a init+=1 
    goto :eof 

:incIter 
    rem echo %init% mod %iter% == %func%; Increasing iter 
    SET /a iter+=1 
    goto :eof 

:done 
    echo. 
    ECHO Val = %init% 
0

Sadece bir "pratik" bir çözüm göndermek için dava birisi "yararlı"

@echo off 
    setlocal enableextensions enabledelayedexpansion 

    rem Our search limit 
    set "limit=20" 
    rem Note: batch arithmetic is limited to 2^31 values, so 26 is the highest 
    rem  value that we can directly use 

    rem Initialize searched number 
    set "euler5=1" 

    rem Initialize list of numbers for a Erastotenes cribe 
    for /l %%a in (2 1 %limit%) do set "f.%%a=%%a" 

    rem Search for prime numbers and simplify (divide) greater multiples 
    rem Keep multiplying as we iterate over the list 
    for /l %%a in (2 1 %limit%) do (
     if !f.%%a! gtr 1 (
      set /a "euler5*=!f.%%a!" 
      for %%c in (!f.%%a!) do for /l %%b in (%%a %%a %limit%) do (
       set /a "f.%%b/=%%c" 
      ) 
     ) 
    ) 

    rem Echo solution 
    echo %euler5% 
0

göre bulabiliriz sadece Bu bağlantıya: link bir modül operatör var. Bu Senaryonu düzeltmez, ancak

Yani onu kesinlikle daha hızlı bir yoldur, bu yerine

@echo off 

::we should start with 21 because we know that all numbers from 1-20 
::cannot be divided by 20 all 20 times. 
::This will also fix the problem of an unwanted a zero remainder at the 
::early numbers 

set count=21 
set divide=1 
::We need to set enabledelayedexpansion so we can use ! as a varible 
::expander. 
setlocal enabledelayedexpansion 

:loop 
:: begin the modulus operator. 
set /a remainder=!count!%%!divide! 
if %remainder%==0 (
if %divide%==20 
::Yea! 
echo number found:%count% 
::Don't forget to pause 
::or else you cant see the number. 
pause 
) else (
set /a divide=%divide%+1 
::equivelent to set /a divide+=1 
goto :loop 
) 
) else (
set /a count=%count%+1 
goto :loop 
) 

deneyebilirsiniz.

İlgili konular