用批处理解决数学问题的代码第1/4页
作者 佚名
来源 批处理
浏览
发布时间 2013-07-09
#01 ! 求水仙花数? #02 ! 有四个数,其中任意三个数相加,所得的和分别是84,88,99,110,求这四个数? #03 ! 赵姑娘的岁数有以下特点: 1. 它的3次方是一个四位数,而4次方是一个六位数; 2. 这四位数和六位数正好是0到9这十个数字组成. 问,这个数应该是什么数? #04 ! 排一本辞典的页码共用了4889个数字。这本辞典共有多少页? 答案:1499 #05 ! 阿聪说他这次去西北看见一群骆驼,共有23个驼峰,60只脚。请问单、双峰骆驼各多少只? #06 ! 有一个五位奇数,将这个五位奇数中的所有2都换成5,所有5也都换成2,其他数保持不变,得到一个新的五位数,若新五位数的一半仍比原五位数大1,那么原五位数是多少? #07 ! 五个连续自然数的和分别能被2、3、4、5、6整除,求满足此条件的最小的一组数。 #08 ! 我是个三位数,其中有一个数字是“3”,还有一个数字是“1”,另一个数字是未知数。如果把“3”变成“4”、把“1”变成“3”,那么,原来的我将比假设后的我的一半还少“9”。你知道原来是个什么数? #09 ? 农夫琼斯对他老婆说:"喂,玛丽亚,如果照我的办法,卖掉75只小鸡,那么咱们的鸡饲料还能维持20夭。然而,假使照你的建议,再买进100只小鸡的话,那么鸡饲料将只够维持15天。" "啊,亲爱的,"她答道,"那我们现在有多少只小鸡呢?" 问题就在这里了,他们究竟有多少只小鸡? #10 ! 在所有的5位数当中,只包含两个3的数字有多少个? #11 ! 将17分成几个自然数的和,求这几个自然数的最大乘积是多少? #12 ? 将自然数2、3......乘到一起,它们的积的最后6位数恰好都是0,最后一个自然数最少可能是几? #13 ! 被除数、除数和商三个数的和是181,商是12,求被除数。 #14 ? 商店里有六箱货物,分别重15、16、18、19、20、31千克,两个顾客买走了其中五箱.已知一个顾客买的货物重量是另一个顾客的2倍,那么,商店剩下的一箱货物重量是多少千克? #15 ? 一个数除以3的余数是2,除以5的余数是1,则这个数除以15的余数是多少? #16 ? 1. p是质数,且p×p+1也是质数。求2006×p。 2. 2006个2的乘积除以7的余数是多少。 ======================================================================================== 解决代码 ======================================================================================== 【01】by [lxmxn] ======================================================================================== @echo off&&setlocal ENABLEDELAYEDEXPANSION for %%a in (1 2 3 4 5 6 7 8 9) do ( for %%b in (0 1 2 3 4 5 6 7 8 9) do ( for %%c in (0 1 2 3 4 5 6 7 8 9) do ( set/a result=%%a*%%a*%%a+%%b*%%b*%%b+%%c*%%c*%%c if "!result!"=="%%a%%b%%c" ( echo %%a%%b%%c是水仙花数! ) ) ) ) pause ======================================================================================== 【02】by [lxmxn] ======================================================================================== ======================================================================================== 【03】by [youxi01] ======================================================================================== @echo off setlocal enabledelayedexpansion for /l %%i in (10 1 30) do ( ::清空变量 set flag= for /l %%a in (0 1 9) do set %%a= ::取得立方和四次方 set /a cube=%%i*%%i*%%i set /a s=!cube!*%%i if !cube! geq 1000 if !cube! lss 10000 ( if !s! geq 100000 if !s! lss 1000000 ( set num=!s!!cube! call :test !num! if not defined flag echo %%i !num! ) ) ) pause>nul |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于用批处理解决数学问题的代码第1/4页的所有评论