youxi01

前面的题目运行效率还有很大的提升空间啊！
回4F，投机取巧（现在的课本0是自然数也是偶数，奇怪）
测试代码：

@echo off 
for /l %%i in (0 10 100) do echo 100以内能被2和5整除的数有： %%i 
pause>nul
复制代码

第五题：产生90个0-100间的不重复的随机数字

pusofalse

oh。。。sorry，看错题意了~不好意思。

lovelymorning

原帖由 pusofalse 于 2008-9-18 17:50 发表
楼上的兄弟少了25 35 。。。
还有你的问题是既能被2整除，又要被5整除？
还是只是被2或5其中一个整除？

25,35……

是偶数吗？老师没教这个耶。。。

即可以被2整除，又可以被5整除，就是两个条件都要成立

比喻

10÷2＝5
10÷5＝2

pusofalse

楼上的兄弟少了25 35 。。。
还有你的问题是既能被2整除，又要被5整除？
还是只是被2或5其中一个整除？

lovelymorning

@echo off
setlocal enabledelayedexpansion
for /l %%i in (24,1,89) do (
set a=%%i
if "!a:~-1!"=="0" echo %%i
)
pause
复制代码

不知是否正确

原理很简单，大于 23,那就是从 24 开始，小于 90 那就只能到 89
被5整除，尾数就必须是 0  或 5 ，而又要求是偶数，所以只需要检测从24到89产生的数列中哪些数最后一位是0的那就满足要求了


第四题：

列出1－100内所有能被2和5整除的偶数（也很简单喔~~~）

batman

这种学习的思路妙，我来解第二题：

@echo off
:begin
set /a n+=2,m=n*3
if %m% lss 100 (
   echo %m%&goto begin
   ) else (
   pause>nul
)
复制代码

同时，本人给出第三题：
列出1－100内所有大于23小于90且能被5整除的偶数（比较容易哦）

pusofalse

这个方法好啊~以游戏的方式.
为支持楼主，我先来解第一道题吧。

@echo off&setlocal enabledelayedexpansion
echo 2
for /l %%a in (3 2 100) do set/a n=2,m=%%a&call :lp %%a
pause>nul&exit/b
:lp
set/a mod=m%%n
if %mod% equ 0 (
   set "res=%res%%n%*"
   set/a m/=n
   goto lp
   ) else (
   set/a n+=1
   if !n! leq !m! goto lp
)
if "!res:~,-1!" equ "%1" echo !res:~,-1!
set "res="
复制代码

效率不怎么样，因为是先分解出每个数的质因数，最后再作比较，期待好的方案。
昨晚思维定向的厉害，简化：

@echo off&setlocal enabledelayedexpansion
echo 2
for /l %%a in (3 2 100) do (
     set/a m=%%a-1,a=0
     for /l %%i in (2 1 !m!) do (
          set/a n=%%a%%%%i
          if !n! equ 0 set a=1
     )
     if !a! equ 0 echo %%a
)
pause
复制代码

第2题：
列出100以内所有能被3整除的偶数。

[ 本帖最后由 pusofalse 于 2008-9-18 02:50 编辑 ]