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

[数值计算] 批处理如何输出如下数列

本帖最后由 pcl_test 于 2016-9-14 21:24 编辑

帮忙写个批处理程序,输出如下数字——
1
2
3
5
8
13
等等
就是 从第三位起,每个数都是前两个数的和。
时光荏苒||新陈代谢&&涛声依旧||本性难移

  1. @echo off&Setlocal enabledelayedexpansion
  2. set /p n=请输入您要显示的数列的项数然后回车:
  3. set /a n1=1&set /a n2=2
  4. echo !n1!>>a.txt
  5. echo !n2!>>a.txt
  6. for /l %%a in (3 1 %n%) do (
  7. set /a n3=!n1!+!n2!&echo !n3!>>a.txt
  8. set /a n1=!n2!&set /a n2=!n3!
  9. )
  10. Endlocal
  11. pause
复制代码
回复 1# 悬崖之树
Still with wax

TOP

@echo off
setlocal enabledelayedexpansion
set var1=1
set var2=2
for /l %%a in (0 1 30 ) do (

set /a var3=!var1!+!var2!
set /a var1=!var2!
set /a var2=!var3!
echo !var3!

)
pause

TOP

本帖最后由 Taurus 于 2012-12-8 09:29 编辑

Fibonacci...
  1. @echo off&set a=0,b=1&for /l %%i in (1,1,47)do call set/aa+=b,b=%%a%%&call echo %%a%%
  2. set/p=
复制代码
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

  1. @echo off
  2. set /a num1=1,max=10000,num=0
  3. :next
  4. set/a num+=num1&set num1=%num%
  5. if %num% leq %max% (echo %num%&goto :next)
复制代码
看得多说得多,远比不上写得多。

TOP

本帖最后由 悬崖之树 于 2012-12-6 22:01 编辑

终于自己写出来了。
  1. @echo off
  2. set a=1&set b=2
  3. echo 1
  4. echo 2
  5. :loop
  6. set /a c=a+b
  7. ping /n 2 127.1>nul
  8. echo %c%
  9. set a=%b%
  10. set b=%c%
  11. if %c% lss 2000000000 goto loop
  12. pause>nul
复制代码
时光荏苒||新陈代谢&&涛声依旧||本性难移

TOP

返回列表