从C语言的题目中挑出来的题目给批处理新手做
[quote][color=Red]所发代码若不止一行,请用code标签把代码部分括起来。[/color]Q: 如何用code把代码扩起来?
A: [url]http://bbs.bathome.net/thread-404-1-1.html[/url]
参考:批处理之家论坛使用常见问题FAQ
[url]http://bbs.bathome.net/thread-3473-1-1.html[/url][/quote]
[color=black][color=red][size=6]申请加精![/size]
[/color]本人从《C语言资料大全》中搜的题目,给新手学习,给高手练习。呵呵。本人也没时间做,留给大家做咯。
=================================================================
----------QQ:327828994
【程序1】
题目:有1、2、3、4个数字,能组成多少个互不相同且无重复数字的三位数?都是多少?
1.程序分析:可填在百位、十位、个位的数字都是1、2、3、4。组成所有的排列后再去
掉不满足条件的排列。
[/color][size=5][color=red]答案:见5楼[/color][/size]
[color=black][size=4][font=宋体]**********************************************************************************[/font]
[/size]
【程序4】
题目:输入某年某月某日,判断这一天是这一年的第几天?
1.程序分析:以3月5日为例,应该先把前两个月的加起来,然后再加上5天即本年的第几天,特殊
情况,闰年且输入月份大于3时需考虑多加一天。
[/color][size=5][color=red]答案:见6楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序8】
题目:输出9*9口诀。
1.程序分析:分行与列考虑,共9行9列,i控制行,j控制列。
[/color][size=5][color=red]答案:见7楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序9】
题目:要求输出国际象棋棋盘。
1.程序分析:用i控制行,j来控制列,根据i+j的和的变化来控制输出黑方格,还是白方格。
[img]http://img.cn.china.cn/image/10/43/93/66/76/1268119848_1_big.jpg[/img]
[/color][size=5][color=red]答案:见36楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序11】
题目:古典问题:有一对兔子,从出生后第3个月起每个月都生一对兔子,小兔子长到第三个月
后每个月又生一对兔子,假如兔子都不死,问每个月的兔子总数为多少?
1.程序分析: 兔子的规律为数列1,1,2,3,5,8,13,21....
[size=5][color=red]答案:见10楼[/color][/size]
[size=5][/size][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序12】
题目:判断101-200之间有多少个素数,并输出所有素数。
1.程序分析:判断素数的方法:用一个数分别去除2到sqrt(这个数),如果能被整除,
则表明此数不是素数,反之是素数。
[/color][size=5][color=red][size=5][color=red]答案:请参考13,15楼[/color][/size][/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[size=5][/size]
【程序13】
题目:打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字立方和等于该数
本身。例如:153是一个“水仙花数”,因为153=1的三次方+5的三次方+3的三次方。
1.程序分析:利用for循环控制100-999个数,每个数分解出个位,十位,百位。[/color]
[color=black]
[/color][size=5][color=red]答案:见18,19楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序14】
题目:将一个正整数分解质因数。例如:输入90,打印出90=2*3*3*5。
程序分析:对n进行分解质因数,应先找到一个最小的质数k,然后按下述步骤完成:
(1)如果这个质数恰等于n,则说明分解质因数的过程已经结束,打印出即可。
(2)如果n<>k,但n能被k整除,则应打印出k的值,并用n除以k的商,作为新的正整数你n,
重复执行第一步。
(3)如果n不能被k整除,则用k+1作为k的值,重复执行第一步。[/color]
[color=black]
[/color][size=5][color=red]答案:见23,24楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[size=5][/size]
【程序16】
题目:输入两个正整数m和n,求其最大公约数和最小公倍数。
1.程序分析:利用辗除法。
::作者提示:资料中未说明何为辗除法。根据C源码可知,辗除法(若a>b,让数a对数b求模得到c,再让数b对数c求模,得到d,再让c对d求模,一直循环直到最后的求模余数n=0)
[/color][size=5][color=red]答案:见27楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序19】
题目:一个数如果恰好等于它的因子之和,这个数就称为“完数”。例如6=1+2+3.编程
找出1000以内的所有完数。
【程序20】
题目:一球从100米高度自由落下,每次落地后反跳回原高度的一半;再落下,求它在
第10次落地时,共经过多少米?第10次反弹多高?
[/color][size=5][color=red]答案:见37,38楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序21】
题目:猴子吃桃问题:猴子第一天摘下若干个桃子,当即吃了一半,还不瘾,又多吃了一个
第二天早上又将剩下的桃子吃掉一半,又多吃了一个。以后每天早上都吃了前一天剩下
的一半零一个。到第10天早上想再吃时,见只剩下一个桃子了。求第一天共摘了多少。
1.程序分析:采取逆向思维的方法,从后往前推断。[/color]
[color=black]
[/color][size=5][color=red]答案:见32楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[size=5][/size]
【程序23】
题目:打印出如下图案(菱形)
*
***
******
********
******
***
*
1.程序分析:先把图形分成两部分来看待,前四行一个规律,后三行一个规律,利用双重
for循环,第一层控制行,第二层控制列。 [/color]
[color=black]
[/color][size=5][color=red]答案:见21楼[/color][/size]
[size=5][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序25】
题目:求1+2!+3!+...+20!的和
1.程序分析:此程序只是把累加变成了累乘。[/color]
[color=black]
[/color][size=5][color=red]答案:见33楼[/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序28】
题目:有5个人坐在一起,问第五个人多少岁?他说比第4个人大2岁。问第4个人岁数,他说比第
3个人大2岁。问第三个人,又说比第2人大两岁。问第2个人,说比第一个人大两岁。最后
问第一个人,他说是10岁。请问第五个人多大?
1.程序分析:利用递归的方法,递归分为回推和递推两个阶段。要想知道第五个人岁数,需知道
第四人的岁数,依次类推,推到第一人(10岁),再往回推。[/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序30】
题目:一个5位数,判断它是不是回文数。即12321是回文数,个位与万位相同,十位与千位相同。
[/color]
[color=black]
[/color][size=5][color=red]答案:见34楼[/color][/size]
[size=5][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序37】
题目:对10个数进行排序
1.程序分析:可以利用选择法,即从后9个比较过程中,选择一个最小的与第一个元素交换,
下次类推,即用第二个元素与后8个进行比较,并进行交换。[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序61】
题目:打印出杨辉三角形(要求打印出10行如下图)
1.程序分析:
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1
[/color][size=5][color=red]答案:见22楼[/color][/size]
[size=5][color=black][/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[/color]
[size=5][/size]
[color=black]【程序69】
题目:有n个人围成一圈,顺序排号。从第一个人开始报数(从1到3报数),凡报到3的人退出
圈子,问最后留下的是原来第几号的那位。
【程序80】
题目:海滩上有一堆桃子,五只猴子来分。第一只猴子把这堆桃子凭据分为五份,多了一个,这只
猴子把多的一个扔入海中,拿走了一份。第二只猴子把剩下的桃子又平均分成五份,又多了
一个,它同样把多的一个扔入海中,拿走了一份,第三、第四、第五只猴子都是这样做的,
问海滩上原来最少有多少个桃子?
[/color][size=5][color=red]答案:见44楼[/color][/size]
[size=5][color=black][/color][/size]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[/color]
[color=black]【程序81】
题目:809*??=800*??+9*??+1 其中??代表的两位数,8*??的结果为两位数,9*??的结果为3位数。求??代表的两位数,及809*??后的结果。[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序83】
题目:求0—7所能组成的奇数个数。[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序84】
题目:一个偶数总能表示为两个素数之和。[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序24】
题目:有一分数序列:2/1,3/2,5/3,8/5,13/8,21/13...求出这个数列的前20项之和。
1.程序分析:请抓住分子与分母的变化规律。 [/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序67】
题目:输入一个数,最大的与第一个元素交换,最小的与最后一个元素交换,然后输出。[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
【程序82】
题目:八进制转换为十进制[/color]
[color=black][/color]
[color=black][font=宋体][size=4]**********************************************************************************[/size][/font]
[/color] 哈哈 沙发。对 来说太难了 如果谁能全部用批处理做出来,那绝对可以成为高手。哈哈 大多的问题在dos联盟里已经解决了
可以考虑加精
欢迎各位朋友继续"突破"
求数字不同的排列组合
论坛里前几天就出现了相关代码,测试代码:[code]@echo off &setlocal enabledelayedexpansionset "str=1 2 3 4 "
for %%a in (%str%) do (
set var1=!str:%%a =!
for %%b in (!var1!) do (
set var2=!var1:%%b =!
for %%c in (!var2!) do (
echo %%a%%b%%c
)
)
)
pause>nul[/code]
求某日期在一年中是第几天
测试代码:[code]@echo off &setlocal enabledelayedexpansionset /p Cdate=请输入日期(如:2008-1-2日或2008/01/02):
for /f "tokens=1-3 delims=/-, " %%a in ("%Cdate%") do (
set/a yy=%%a,mm=100%%b%%100,dd=100%%c%%100
)
call ate2Day %yy%-1-1 days1
call ate2Day %Cdate% days2
set/a res=days2-days1+1
echo.&echo %yy%年%mm%月%dd%日 是 %yy%年 的第 %res% 天。
pause>nul
goto :eof
::注意:以下"函数"由willsort完成(略有改动);
ate2Day 日期 传回(数值)结果
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (
set yy=%%a & set mm=%%b & set dd=%%c
)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF
ay2Date 数值 传回(日期)结果
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%-%mm%-%dd%&goto :EOF [/code]
打印99乘法表
此题namejm已经做了,测试代码:[code]@echo off &setlocal enabledelayedexpansionfor /l %%a in (1 1 9) do (
for /l %%b in (1 1 %%a) do (
set/a res=%%a*%%b
set "res=!res! " %======此处用来对齐=========%
set/p=%%ax%%b=!res:~0,2! <nul
)
echo.
)
pause>nul[/code]
程序9
意思不明:“控制输出黑方格,还是白方格。”是这样吗:□和■ 不错不错,高手不愧是高手 继续兔子问题哈。不能一直管理员做题,我也做,这是我写的,测试没有错。
@echo off&setlocal enabledelayedexpansion
:a
set/p n=请输入月份
set a1=1
set a2=0
for /l %%i in (1,1,%n%) do (
set /a a3=!a1!+!a2!
set a1=!a2!
set a2=!a3!
echo !a3!)
pause
cls&goto a 素数问题:提示
另一方面,除去1以外,有的数除了1和它本身以外,不能再被别的整数整除,如
2、3、5、7、11、13、17、...
等,这种数称作素数(也称质数)。有的数除了1和它本身以外,还能被别的整数整除,这种数就叫合数,如
4、6、8、9、10、12、14、...
等,就是合数。
大家做啊 【程序12】
题目:判断101-200之间有多少个素数,并输出所有素数。
1.程序分析:判断素数的方法:用一个数分别去除2到sqrt(这个数),如果能被整除,
则表明此数不是素数,反之是素数。
:[code]@echo off&setlocal EnableDelayedExpansion
for /l %%a in (101 1 200) do (
set /a n=%%a-1&set "flag="
for /l %%b in (2 1 !n!) do (
set /a m=%%a%%%%b
if !m! equ 0 set flag=a
)
if not defined flag echo 素数 %%a
)
echo\&pause[/code]
回复 12楼 的帖子
代码稍做修改,效率稍有提高:[code]@echo off&setlocal EnableDelayedExpansion
for /l %%a in (101 2 200) do (
set "flag="
for /l %%b in (3 2 15) do (
set /a m=%%a %% %%b
if !m! equ 0 set flag=A
)
if not defined flag echo 素数 %%a
)
echo\&pause
[/code]继续修正1,运行所用时间仅为原来的1/4
继续修正2,运行速率提高为原来的20倍
注意
以上计算方法个人认为适合 求算 10000 以内的素数,对于超大数字,应使用其它计算方法 @echo off&setlocal EnableDelayedExpansionfor /l %%a in (101 2 200) do (
set t=%%a
set "flag="
set /a x=!t!/2
for /l %%b in (2 1 !x!) do (
set /a m=%%a %% %%b
if !m! equ 0 set flag=A
)
if not defined flag echo 素数 %%a
)
echo\&pause
其实上面这段代码通用的,就是每个数让他去除小于它开根的数(但批处理不能算出根号,所以把范围在扩大为这个数到一半),youxi01的代码在101-200之内没问题,但换作把范围400时就多出了很多结果,呵呵,但用在101-200之内时就正确,而且运行速度快。上面这段代码就运行速度慢了点,但是没错误
[[i] 本帖最后由 huajinghua 于 2008-4-11 13:42 编辑 [/i]]
回复 15楼 的帖子
呵呵,换做400时,将第二个for循环中的 15 改成 20 即可!! 继续讨论水仙花数…… 水仙花数原创作者: 梦想种子
:[code]@echo off&setlocal enabledelayedexpansion
:: 原创作者: 梦想种子
for /l %%i in (0 1 9) do set /a t%%i=%%i*%%i*%%i
for /l %%i in (1 1 10000) do (
set "k=00000%%i"
set a=!k:~-1!
set b=!k:~-2,1!
set c=!k:~-3,1!
set d=!k:~-4,1!
set e=!k:~-5,1!
set /a n=t!a!+t!b!+t!c!+t!d!+t!e!
if "!n!" == "%%i" echo %%i
)
pause[/code]
求水仙花数
测试代码:[code]@echo off&setlocal enabledelayedexpansionecho 水仙花数有:&echo.
for /l %%i in (100 1 999) do (
set var=%%i
set/a num1=!var:~0,1!,num2=!var:~1,1!,num3=!var:~2,1!
set/a var=!num1!*!num1!*!num1!+!num2!*!num2!*!num2!+!num3!*!num3!*!num3!
if !var! EQU %%i echo %%i
)
pause>nul[/code]
回复 18楼 的帖子
呵呵,这句非常不错,避免了重复计算。[quote]
for /l %%i in (0 1 9) do set /a t%%i=%%i*%%i*%%i
[/quote] 【程序23】
题目:打印出如下图案(菱形)
*
***
******
********
******
***
*
:[code]@echo off&setlocal enabledelayedexpansion
set "ko= "
for /l %%i in (1 2 13) do (
if defined flag (set /a n-=2&set /a c-=1) else set /a n=%%i&set /a c+=1
call set m=%%ko:~!c!%%
set /p=!m!<nul
for /l %%b in (1 1 !n!) do set /p=*<nul
echo.
if !n! geq 7 set flag=a
)
echo.&pause[/code] 打印杨辉三角
转一个,
原创作者:wudixin96
:[code]@echo off&setlocal enabledelayedexpansion
:top
::原创作者:wudixin96
:: in=行数:
set/a ab=1,var=30,in=10
set str=1
for /l %%i in (1,1,%in%) do (
set "num="
set /a num2=0
for %%a in (!str!) do (
set /a num2+=1
if !num2!==1 set "str1="
set /a num1=%%a+num
set "str1=!str1! !num1!"
set num=%%a
)
call :lis "!str1:~1!"
set "str=!str1! 0"
)
pause>nul
exit
:lis
set max=%~1
for /l %%a in (0 1 300) do (
if not "!max:~%%a,1!"=="" set /a ci+=1
)
set /a ki=var-ci/2
for /l %%a in (1 1 !ki!) do set "kg= !kg!"
echo !kg!!max!
set nam!ab!=!kg!!max!
set /a ab+=1
set ci=0&set "kg="
goto :eof[/code]
分解质因数
【程序14】题目:将一个正整数分解质因数。例如:输入90,打印出90=2*3*3*5。
程序分析:对n进行分解质因数,应先找到一个最小的质数k,然后按下述步骤完成:
(1)如果这个质数恰等于n,则说明分解质因数的过程已经结束,打印出即可。
(2)如果n<>k,但n能被k整除,则应打印出k的值,并用n除以k的商,作为新的正整数你n,
重复执行第一步。
(3)如果n不能被k整除,则用k+1作为k的值,重复执行第一步。
代码如下[code]@echo off
set /p a=请输入要分解的数
set /a c=a/2
:a
set /a b=%b%+1
set /a d=%a%/%b%
set /a s=%a%%%%b%
if not "%s%"=="0" (goto a) else (set/p=%b% <nul &set a=%d% &set b=1&goto a)
pause[/code]
[[i] 本帖最后由 huajinghua 于 2008-4-11 19:23 编辑 [/i]]
分解质因数
测试代码(里有一bug,不知各位是否测试的出来,目前并不明白bug产生原因)[code]@echo off&setlocal enabledelayedexpansion:start
cls
set "str=1"
set /p EN=请输入一个数字:
call :CheckPrime %EN% Prime Remainder
set str=%str% x !OBJ!
if "!str:~-2,1!"=="1" set str=!str:~0,-4!
if not "!str:~-6,1!"=="1" set str=!str:~4!
echo.&echo %EN% = !str!
pause>nul
goto :start
:CheckPrime OBJ Prime Remainder
set /a OBJ=%~1,Remainder=0
set /a var=!OBJ!/2+1,var_=!OBJ! %% 2
if !var_! EQU 0 (
set str=!str! x 2
set/a Prime=2,Remainder=!OBJ!/2
call :CheckPrime !Remainder! Prime Remainder
)
for /l %%i in (3 2 !var!) do (
set /a var_=!OBJ! %% %%i
if !var_! EQU 0 (
set str=!str! x %%i
set/a Prime=%%i,Remainder=!OBJ!/%%i
call :CheckPrime !Remainder! Prime Remainder
)
)[/code]
回复 24楼 的帖子
这么多题,在答题时,把题目一起贴出来好吗?回复 23楼 的帖子
代码够简洁,不错。但是碰到大指数肯定会遭遇效率问题,举例:3659
程序16:输入两个正整数m和n,求其最大公约数和最小公倍数。
转一个自己较早前写的代码了:[code]@echo offecho.
echo 求两数的最大公约数、最小公倍数
echo ========================================
title 求两数的最大公约数
setlocal enabledelayedexpansion
set /p num1=请输入第一个数字:
set /p num2=请输入第二个数字:
set/a res=%num1%*%num2%
echo ----------------------------------------
echo %num1%和%num2%:&echo.
:test
set /a temp=%num1% %% %num2%
if %temp% NEQ 0 (
set /a num1=!num2!
set /a num2=!temp!
goto :test)
set /a res=%res%/%num2%
echo 最小公倍数为:%res% 最大公约数为:%num2%
pause>nul[/code]
回复 26楼 的帖子
对哦,呵呵,碰到大的素数时却是运算很慢。回复 1楼 的帖子
建议将程序问题 和 解决方案按照如下格式罗列:问题:***
解决方案:***F(***楼)
以便于查阅 已将帖子题目和答案编辑好了!