バッチファイルでProject Euler（11） - inamori’s diaryProblem 4 まず、ある自然数が3桁の自然数同士の積になっているかどうかを調べるコードを書きましょう。999から降順に割っていって、割り切れたら積になっています。割り算の結果が自分以上になったら積がないことになります。 :is_product setlocal set /a d = 999 :loop_is_product set /a q = %1 / %d% if %q% GTR %d% exit /b 0 set /a r = %1 %% %d% if %r% == 0 exit /b 1 set /a d -= 1 goto :loop_is_product 次に、回文数になっているかどうかを調べるコードを書きましょう。これは再帰で簡単に書けます。 :is_palindromic setlocal if "%1%" == "" exit /b 1 set n=%1 set f
