批处理之家 - Powered by Discuz! Board

标题: [数值计算] 如何能在批处理中加上优良及格和不及格呢？ [打印本页]

作者: 63918841 时间: 2009-12-2 18:44 标题: 如何能在批处理中加上优良及格和不及格呢？

@echo off&set /a var=0,num=91
for /l %%a in (1 1 9) 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

作者: 63918841 时间: 2009-12-2 18:46 标题: 如图，哎

真的有点伤脑筋，想不出来了

作者: 523066680 时间: 2009-12-2 19:16

个别句子没去理解用意，另外，换个风格

 
@echo off&set /a var=0,num=91,act=0
:act
  set /a act+=1
  :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
    rem setw(及格,不及格,是不是自己改的分数)
    (
     if %w% lss 60 set w=%w%       我同胞,不及格
     if %w% geq 80 set w=%w%   优秀
     if %w% equ 100 set w=%w% 是不是自己改的分数
     )
    echo 同学%act%  的成绩 %w%
if %act% lss 9 goto :act
pause &exit
复制代码

小弟只是小小帮忙一下，希望旁观的上正点货。
不过估计是旁观的做的题多了，看到类似就闪了……

[ 本帖最后由 523066680 于 2009-12-2 19:29 编辑 ]

作者: rwxyxy 时间: 2009-12-2 19:22

@echo off&set /a var=0,num=91
for /l %%a in (1 1 9) do (
  call :lis %%a
  call echo %%a 号同学   成绩是 %%w%%
)
pause>nul
: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%  不及格) else (
  if %w% lss 70 (set w=%w%  及格) else (
  if %w% lss 80 (set w=%w%  中)  else (
  if %w% lss 90 (set w=%w%  良) else (
  set w=%w%  优))))
goto :eof
复制代码

作者: 63918841 时间: 2009-12-2 21:15

谢谢，你帮了我大忙，我想研究一下

作者: 63918841 时间: 2009-12-2 21:21 标题: 真的是很好的学习

再次感谢大家，有了解一层了，各位真热心呀

欢迎光临批处理之家 (http://bbs.bathome.net/)