![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-09 12:08 |
共 47,811 主题排行 / 349,895 发帖 / 今日 0 篇 / 48,254 会员排行 |
| DOS批处理 & 脚本技术(批处理室) » 用批处理做个练习计算题的程序 |
| 可打印版本 1,080 / 6 |
| 第1楼 qieagle | 发表于 2007-04-23 08:06 |
| 初级用户 发帖 8 积分 20 | |
|
用批处理做个练习计算题的程序 哇!批处理室真热闹啊!
我有个想法,希望通过批处理文件来实现,请各位大侠帮帮忙。应该能实现的! 我儿子正在读小学,想用一个程序让他练习计算题,要有不同的难度和类型: 难度:通过输入数字确定范围,如:20以内、100以内,等等; 类型:加、减、乘、除,除法余数为0。 我知道,有很多软件可以实现这个功能,但我就是喜欢批处理!没办法。:P [ Last edited by qieagle on 2007-4-22 at 07:08 PM ] |
|
| 第2楼 youxi01 | 发表于 2007-04-23 08:12 |
| 高级用户 发帖 247 积分 846 来自 湖南==》广东 | |
|
当然,P处理可以实现你的愿望,但是,有可能不是很完美。
至于,你的问题,应该来说,不难解决。 重要的是,你的加、减、乘、除,是2项计算,还是多项,如果是多项目,是不是要考虑混合计算(包括加减乘除) |
|
| 第3楼 qieagle | 发表于 2007-04-24 04:24 |
| 初级用户 发帖 8 积分 20 | |
|
呵呵!
先来个一步计算的吧。 |
|
| 第4楼 lslcxlsl | 发表于 2008-08-19 14:41 |
| 初级用户 发帖 24 积分 52 | |
|
现学现卖一个
@echo off setlocal enabledelayedexpansion set /a a=1 :test set /a _num!a!=%random:~-3% if not defined !_num%a%! set /a a+=1 if !a! LSS 6 goto :test set /a d =%_num1%*%_num2%+%_num3%-%_num4%/%_num5% echo %_num1%*%_num2%+%_num3%-%_num4%/%_num5%= %d% >>c:\gs.txt pause>nul 这个也许可以帮你 1, !=%random:~-3% 3就是随机产生的位数 2,echo 显示的时候 加上了运算符号。 [ Last edited by lslcxlsl on 2008-8-19 at 03:04 PM ] |
|
| 第5楼 523066680 | 发表于 2008-08-19 14:42 |
| 银牌会员 发帖 1,133 积分 2,362 | |
|
你儿子要是乘机学会用批处理解你的计算题 那就牛逼喽
|
|
| 第6楼 ccily2701 | 发表于 2008-08-21 17:02 |
| 初级用户 发帖 45 积分 80 来自 jiangxi | |
|
楼上的。。你真逗
![]() |
|
| 第7楼 qq152576450 | 发表于 2008-08-21 22:35 |
| 新手上路 发帖 3 积分 6 来自 川 | |
|
@echo off &&color 1f
:start set /p n=多少以内的运算 set /a f=%random%%%4 :main1 set /a a=%random%%%%n% set /a b=%random%%%%n% if %f%==1 goto test1 if %f%==3 goto test2 :main2 if %f%==0 set k=+ && set /a op=%a%+%b% if %f%==1 set k=- &&set /a op=%a%-%b% if %f%==2 set k=X && set /a op=%a%*%b% if %f%==3 set k=/ && set /a op=%a%/%b% set /p answer=%a% %k% %b% ^= if %answer%==%op% (echo right) else (echo WRONG The right answer is %op% ) pause>nul goto start :test1 set /a t1=%a%-%b% if /I %t1% geq 0 goto main2 else goto main1 :test2 set /a t2=%a%%%%b% if %t2%==0 goto main2 else goto main1 |
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |