看起容易,作起来还真挺麻烦的。
搞了半天才搞出来。
:- @echo off&set /a var=0,num=91
- for /l %%a in (1 1 60) do (
- call :lis %%a
- call echo %%a 号同学 成绩是 %%w%%
- )
- pause&exit
- :lis
- set /a w=%random%%%%num%+10
- if %w% lss 60 set /a var+=1
- if %var% gtr 3 if %w% lss 60 goto lis
- set /a str=57+var
- if %str% equ %1 set num=50&goto lis
- if %w% lss 60 set w=%w% 不及格
- goto :eof
复制代码 .
[ 本帖最后由 随风 于 2008-1-7 12:29 编辑 ] |