[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
12
返回列表 发帖
尘丶

Rank: 3Rank: 3

帖子
162 
积分
258 
技术
22  
捐助
0  
注册时间
2015-4-3 
16楼 跳转到 »
发表于 2015-5-31 09:41 | 只看该作者 
  1. @echo off

  2. setlocal enableDelayedExpansion

  3. set /a A=%random%%%5*9

  4. set /a B=(%random%%%3+1)*3

  5. set fuhao="+-*/"

  6. :calc

  7. set/a n+=1

  8. set/a RS=%A%!fuhao:~%n%,1!%B%

  9. echo %A% !fuhao:~%n%,1! %B% = %RS%

  10. if %n%==4 goto exit

  11. if not "!fuhao:~%n%,1!"=="" goto :calc

  12. pause>nul

  13. goto :eof

  14. :exit

  15. pause
复制代码
这题算是10吗，比之前的for处理容易多了 = =

TOP

437153

Rank: 2

帖子
78 
积分
108 
技术
3  
捐助
0  
注册时间
2012-11-29 
17楼
发表于 2015-6-8 11:24 | 只看该作者 
  1. @echo off&setlocal enabledelayedexpansion

  2. set/a A=%random%%%5*9

  3. set/a B=(%random%%%3+1)*3

  4. set "fuhao=+-*/"

  5. :calc

  6. set/a RS=A!fuhao:~%n%,1!B

  7. echo %A% !fuhao:~%n%,1! %B% = %RS%

  8. set/a n+=1

  9. if not "!fuhao:~%n%,1!" == "" goto :calc

  10. pause>nul

  11. goto :eof
复制代码

TOP

m91opse

Rank: 1

帖子
31 
积分
49 
技术
0  
捐助
0  
注册时间
2018-4-13 
18楼
发表于 2018-5-5 19:44 | 只看该作者
大哥这么厉害，求大哥，帮我解决这个问题吧 http://www.bathome.net/thread-47992-1-1.html

TOP

唯尘

Rank: 1

帖子
77 
积分
88 
技术
0  
捐助
0  
注册时间
2015-7-29 
19楼
发表于 2024-5-10 09:06 | 只看该作者
@echo off
setlocal enabledelayedexpansion
set /a a=%random%%%5*9
echo a=%a%
set /a b=(%random%%%3+1)*3
echo b=%b%
set "fuhao=+-*/"
set /a n=0

:calc
if "!fuhao:~%n%,1!"=="" echo 循环完毕 & pause>NUl & goto :eof
set /a rs=%a%!fuhao:~%n%,1!%b%
echo a !fuhao:~%n%,1! b = !rs!
set /a n+=1
goto :calc
看完大佬的代码自己默写了一遍

TOP

12
返回列表