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

Rank: 8Rank: 8

帖子
618 
积分
6100 
技术
9  
捐助
0  
注册时间
2008-8-10 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2008-11-20 19:41 | 只看该作者

[ 新手习题 10 ] 批处理四则运算代码改错

  1. @echo off

  2. setlocal enableDelayedExpansion

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

  4. set 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 not "!fuhao:~%n%,1!"=="" goto :calc

  11. pause>nul

  12. goto :eof
复制代码
目的：学会分析自己或是他人的代码，改正其中的错误使程序能正常的运行。

要求：修改代码使其显示两个随机数的和差积商。效果如图：
由于是随机数，A、B 不一定是 18 和 9。


相关知识点：set 的数学运算表达方式，随机数、变量延迟、变量截取和 goto 配合标签的循环。
收藏 分享

lhjoanna

Rank: 8Rank: 8

帖子
231 
积分
2503 
技术
12  
捐助
0  
注册时间
2008-10-12 
2楼
发表于 2008-11-20 23:30 | 只看该作者
奇怪wxcute兄出的题目很好啊，怎么没人来做。我来做一个：
  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. set /a n=0

  7. echo A=%A%  B=%B%

  8. :calc

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

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

  11. set /a n+=1

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

  13. pause>nul

  14. goto :eof
复制代码

[ 本帖最后由 lhjoanna 于 2008-11-21 00:14 编辑 ]
1

评分人数

    • wxcute: 赞一个。感谢深夜还在做题PB + 8

TOP

stalker

Rank: 5Rank: 5

帖子
19 
积分
647 
技术
1  
捐助
0  
注册时间
2008-11-17 
3楼
发表于 2008-11-22 21:45 | 只看该作者
看看高手我的
哈哈，开个玩笑，其实我研究好久才搞明白
  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. set/a n=0

  7. :calc

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

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

  10. set/a n+=1

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

  12. goto :eof
复制代码
wxcute老大，我仍然有个疑问，为什么在变量截取!fuhao:~%n%,1!中只能用%n%而不能是!n!呢？
1

评分人数

    • wxcute: 很好。 你的问题：为什么在变量截取!fuhao ...PB + 8

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
4楼
发表于 2008-11-22 23:12 | 只看该作者
凑个热闹吧：

  1. @echo off&setlocal enableDelayedExpansion

  2. set /a A=%random%%%5*9,B=(%random%%%3+1)*3

  3. set "fuhao= +-*/"

  4. :calc

  5. set/a n+=1

  6. if "!fuhao:~%n%,1!" equ "" pause>nul&goto :eof

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

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

  9. goto calc
复制代码



[ 本帖最后由 batman 于 2008-11-22 23:13 编辑 ]
＊＊＊共同提高＊＊＊

TOP

stalker

Rank: 5Rank: 5

帖子
19 
积分
647 
技术
1  
捐助
0  
注册时间
2008-11-17 
5楼
发表于 2008-11-23 11:00 | 只看该作者
多谢wxcute老大解答我的疑惑(^_^)

TOP

h5599859

Rank: 3Rank: 3

帖子
13 
积分
232 
技术
0  
捐助
0  
注册时间
2008-10-3 
6楼
发表于 2008-11-25 09:43 | 只看该作者
@echo off
setlocal enableDelayedExpansion
set /a A=%random%%%5*9+1
set /a B=(%random%%%3+1)*3
set fuhao="+-*/
:calc
set/a n+=1
set/a RS=%A%!fuhao:~%n%,1!%B%
echo %A% !fuhao:~%n%,1! %B% = %RS%
if not "!fuhao:~%n%,1!"=="/" goto calc
pause>nul

TOP

keen

Rank: 8Rank: 8

帖子
593 
积分
4452 
技术
1  
捐助
0  
注册时间
2008-8-10 
7楼
发表于 2009-3-31 10:50 | 只看该作者 
  1. @echo off

  2. setlocal enableDelayedExpansion

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

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

  5. set "fuhao=+-*/"

  6. :calc

  7. if "!fuhao:~%n%,1!"=="" pause &exit

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

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

  10. set /a n+=1 &goto :calc
复制代码
1

评分人数

    • wxcute: 两个随机数并没有显示出来。PB + 2
(*^_^*)

TOP

tyc

Rank: 2

帖子
25 
积分
195 
技术
1  
捐助
0  
注册时间
2009-3-16 
8楼
发表于 2009-3-31 13:44 | 只看该作者

try

@echo off
setlocal enableDelayedExpansion
set /a A=%random%%%5*9
set /a B=(%random%%%3+1)*3
set fuhao=+-*/a
pause>nul
set /a n=0
:calc
set /a RS=%A% !fuhao:~%n%,1! %B%
echo !A! !fuhao:~%n%,1! !B! = %RS%
set /a n+=1
if not "!fuhao:~%n%,1!"=="a" goto :calc
pause>nul
goto :eof
1

评分人数

    • wxcute: 很棒，请用 CODE 闭合代码。PB + 4

TOP

cainiao736

Rank: 2

帖子
26 
积分
178 
技术
0  
捐助
0  
注册时间
2009-3-18 
9楼
发表于 2009-3-31 19:49 | 只看该作者 
  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. set n=1

  7. :calc

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

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

  10. set /a n+=1

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

  12. pause>nul

  13. goto :eof
复制代码
嘿嘿，其实不是很明白，改来改去就给改好了
1

评分人数

    • wxcute: 不错，睡一觉也许就明白了，嘻嘻。PB + 4

TOP

keen

Rank: 8Rank: 8

帖子
593 
积分
4452 
技术
1  
捐助
0  
注册时间
2008-8-10 
10楼
发表于 2009-4-1 09:12 | 只看该作者
多谢wxcute老大指正！修改如下：
  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. if "!fuhao:~%n%,1!"=="" pause &exit

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

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

  10. set /a n+=1 &goto :calc
复制代码
1

评分人数

    • wxcute: 不好意思，现在才补上积分PB + 2
(*^_^*)

TOP

mckobe

Rank: 2

帖子
3 
积分
108 
技术
0  
捐助
0  
注册时间
2009-4-5 
11楼
发表于 2009-4-16 15:18 | 只看该作者
@echo off
setlocal enableDelayedExpansion
set/a A=%random%%%5*9
set/a B=(%random%%%3+1)*3
set fuhao=+-*/
set/a n=0
:calc
if not "!fuhao:~%n%,1!"=="" (set/a RS=%A%!fuhao:~%n%,1!%B%&echo %A% !fuhao:~%n%,1! %B% = !RS!)
set/a n+=1
goto :calc
pause>nul
goto :eof
1

评分人数

    • wxcute: 代码会陷入死循环。PB + 2

TOP

sjzong

Rank: 4

帖子
90 
积分
378 
技术
3  
捐助
0  
注册时间
2009-3-28 
12楼
发表于 2009-4-16 22:22 | 只看该作者

我也来一个！

  1.  

  2. @echo off

  3. setlocal enableDelayedExpansion

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

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

  6. echo A=%A% B=%B%

  7. set fuhao=+-*/

  8. :calc

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

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

  11. set/a n+=1

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

  13. pause>nul

  14. goto :eof
复制代码

[ 本帖最后由 sjzong 于 2009-4-16 22:48 编辑 ]
1

评分人数

TOP

battab

Rank: 2

帖子
80 
积分
112 
技术
2  
捐助
0  
注册时间
2013-12-4 
13楼
发表于 2013-12-16 14:26 | 只看该作者 
  1. @echo off

  2. setlocal enableDelayedExpansion

  3. set /a A=(%random%%%5+1)*9

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

  5. set fuhao= +-*/

  6. set n=1

  7. :calc

  8. if %n% gtr 4 goto end

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

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

  11. if not "!fuhao:~%n%,1!"=="" set/a n+=1&goto :calc

  12. :end

  13. pause>nul
复制代码
学习中

TOP

BHsolve

Rank: 1

帖子
32 
积分
56 
技术
0  
捐助
0  
注册时间
2013-12-21 
14楼
发表于 2013-12-29 20:31 | 只看该作者 
  1. @echo off

  2. color 0B

  3. setlocal enabledelayedexpansion

  4. set /a A="%random%%%5"*9

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

  6. echo A=%A% B=%B%

  7. set fuhao=+-*/

  8. set/a n=0

  9. :calc

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

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

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

  13. set /a n+=1 && goto calc

  14. )

  15. pause>nul
复制代码
学习了

TOP

ann

Rank: 1

帖子
18 
积分
30 
技术
0  
捐助
0  
注册时间
2014-11-8 
15楼
发表于 2014-12-20 15:20 | 只看该作者
谢谢了，第一次遇到这样的题，学习了
  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 not "%n%"=="4" goto :calc

  11. pause>nul

  12. goto :eof
复制代码

TOP

12
返回列表