wxcute

【程序84】
题目：一个偶数总能表示为两个素数之和。

@echo off
if exist ss.txt goto :bb

::显示100以内素数
set m=2
>ss.txt echo 2
set/a m+=1
>>ss.txt echo 3

:zz
set flag=
set/a m+=2
set/a n=m-1
for /l %%i in (2 1 %n%) do (
　call :sf %%i
)
if not defined flag >>ss.txt echo %m%
if %m% lss 99 goto :zz

:bb
::显示100以内偶数
for /l %%o in (4 2 100) do call :pd %%o
pause
goto :eof

::显示偶数成两个素数的和
:pd
　set sflag=
　for /f %%m in (ss.txt) do (
　　for /f %%n in (ss.txt) do (
　call :bj %%m %%n he %1
　if defined sflag goto :show
　　)
　)
:show
　echo %1=%xx%+%yy%
　goto :eof
:sf
　set/a x=m%%%1
　if %x%==0 set flag=1
　goto :eof
:bj
　set/a xx=%1
　set/a yy=%2
　set/a %3=%1+%2
　if %he% equ %4 set sflag=1
复制代码