Board logo

标题: [数值计算] 批处理生成成绩数字列表 [打印本页]

作者: youxi01    时间: 2008-1-4 22:30     标题: 批处理生成成绩数字列表

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

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

:
  1. @echo off&set /a var=0,num=91
  2. for /l %%a in (1 1 60) do (
  3.   call :lis %%a
  4.   call echo %%a 号同学   成绩是 %%w%%
  5. )
  6. pause&exit
  7. :lis
  8.   set /a w=%random%%%%num%+10
  9.   if %w% lss 60 set /a var+=1
  10.   if %var% gtr 3 if %w% lss 60 goto lis
  11.   set /a str=57+var
  12.   if %str% equ %1 set num=50&goto lis
  13.   if %w% lss 60 set w=%w%  不及格
  14. goto :eof
复制代码
.

[ 本帖最后由 随风 于 2008-1-7 12:29 编辑 ]
作者: youxi01    时间: 2008-1-6 10:02

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




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2