[数值计算] 批处理生成成绩数字列表

youxi01

用批处理自动生成学生成绩.
具体要求:
1、每位同学的成绩随机获得（10~100之间）；
2、及格人数占95%(60分视作及格；每个班按60人计)；

随风

看起容易，作起来还真挺麻烦的。
搞了半天才搞出来。

:

@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 编辑 ]

youxi01

呵呵，正需要
虽然不是太符合我的...
但已经是很好了，感激不尽啊!