[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off&title 数列的简单计算&setlocal enabledelayedexpansion
  2. echo 数列的简单计算,请输入数列的前3项
  3. set er=0
  4. set /p a1=请输入A1:
  5. set /p a2=请输入A2:
  6. set /p a3=请输入A3:
  7. set /a b1=a2-a1
  8. set /a b2=a3-a2
  9. set /a c1=a2/a1
  10. set /a c2=a3/a2
  11. if %b1%==%b2% (
  12. set /a a4=a3+b1
  13. echo 您输入的数列是等差数列,第四项为!a4!。
  14. set /a er+=1
  15. )
  16. if %c1%==%c2% (
  17. set /a a4=a3*c1
  18. echo 您输入的数列是等比数列,第四项为!a4!。
  19. set /a er+=1
  20. )
  21. if %er%==0 echo 您输入的数列既不是等差数列也不是等比数列。
  22. echo 分析完毕,请按任意键推出...
  23. pause>nul  
复制代码
只支持等差和的等比数列,其他的可以自行添加公式。
1

评分人数

    • wxcute: 题目已经被你扩展了 ^_^PB + 5

TOP

原帖由 wxcute 于 2008-12-19 10:16 发表
规律可能不止一种,毕竟只有三个数。

2*5=10
5*8=40
8*20=160
第4个数是20??
这样可以吗??

TOP

返回列表