- 博客(7)
- 资源 (1)
- 收藏
- 关注
转载 数独(九宫格)
Mark:此程序的关键记算来源于http://gundumw100.iteye.com/blog/760402,非本人原创。Option Explicit'/增加随机产生固定数'|产生随机数的数独'|来源:http://gundumw100.iteye.com/blog/760402'|原理'| 1.随机产生1-9之间数字'| 2.检查所处行、列、3X3区域
2015-11-25 09:40:05 1499
转载 十进制转为二进制
用递归的方法将十进制转换为低进制'//此程序只适合10转2Public str$ '转换后字符Sub Convert()Dim n&, b& '需转换字符,转换进置With Sheet5n = .Cells(3, 1) '原始10进制值b = 2 '需转换成进制'//将十进制转换为二进制.Cells(3, 2) = Ten2Two(n, b)End WithE
2015-11-24 17:48:25 472
转载 相同格式EXCEL汇总
以下VBA用以汇总相同格式的工作表.Option ExplicitSub Collection()'Collection Data into TTL worksheetDim Sh As Worksheet, SQL$, m%, Conn As ObjectDim MaxClm&, TitleArr()'++++++++++++++++++++++++++++++++++++++++
2015-11-23 13:28:37 422
转载 枚举法-填数
在奥数中会有如下的题目: 算 法 描 述 题 X 算 题 题 题 题 题 解法: 假设每个数字都从0-9循环 直到计算出的结果与真实结果相等 pesudeocode: 算=i1:法=i2:描=i3:述=i4:题=i5 for i1=1 to 9 for i2=0 to 9 for i3=0 to 9 for i
2015-11-22 09:50:01 361
转载 等额本金-逆推
等额本金是递归逆推的一个方法:父亲准备4年的生活费,使且整存零取的方式,控制每月底只能提取1000元,假设银行年利息为1.71%思路:第48个月取出1000,则要先求出47个月时银行存款的具体金额:第47个月的存款=1000/(1+1.71%/12)第47个月的存款=(第47个月的存款+1000)/(1+1.71%/12)........第1个月的存款=(第2个月的存款
2015-11-22 09:34:41 698
转载 FIBONACCI-顺推
公元1202年欧洲数学家伦纳德·斐波那契在他所著的《珠算的书》(Liber Abbaci)中有这样一道习题:假定每对兔子每个月生出一对兔子。新生的兔子一个月后有了生育能力,再过一个月又生出一对兔子。那么买一对新生的兔子回来,一年后有多少对兔子?显然,第一个月有一对,第二个月还是一对,第三个月有两对,第四个月有三对,第五个月有五对……容易推得,某月的兔子数正好是前两个月兔子数之和。如果用F(n)
2015-11-21 19:37:25 279
转载 二分法猜价格
'//程序用逐步法猜价格'//假设价格都是整数,没有小数Sub GP_Step()Dim Price&, i&, Guess&, Step&' 正确价格,变量,猜想值Dim Min&, Max&' 最小值,最大值Min = 1: Max = 999With Sheet1Price = .Cells(3, 1)For i = Min To Max Step = Ste
2015-11-20 16:36:15 857
EXCEL DATA ANALYSIS
2018-03-30
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人